Forenindex » Programme » Print/Bildbearbeitung » Adobe InDesign » Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Leiti373
Beiträge gesamt: 43

31. Okt 2018, 15:17
Bewertung:

gelesen: 16277

Beitrag als Lesezeichen
Hallo Gemeinde,

wie ich feststellen musste hat InDesign wohl keine Lust, Zelldaten zu importieren, die durch einen SVERWEIS entstehen. Händisch eingetragene Werte sind kein Problem.

Ich habe dann das ganze über Makros gelöst. Das blöde hierbei - InDesign lässt keine Makro-Excel (.xlsm) platzieren.

Ich brauche aber diese SVERWEIS-Funktion um immer die aktuellsten Zellinhalte in den verschiedenen Tabellenblättern zu haben, die ich innerhlab dieser Tabelle erstelle und dann in InDesign importiere.

Hat jemand eine Idee wie man das lösen könnte?

Danke,
Markus

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

MarioF
Beiträge gesamt: 390

1. Nov 2018, 15:20
Bewertung:

gelesen: 16225

Beitrag als Lesezeichen
Moin,
zum einen könntest Du mal testen, die Excel als xls zu speichern und testen, ob alle Makros laufen.
Wenn nicht, eine neue xls erstellen und über
=[datei.xlsm]Tabelle!$A$1
eine Ausgabe nur für InDesign zu erstellen.
---
Viele Grüße
Mario

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Klaus79
Beiträge gesamt: 341

1. Nov 2018, 15:41
Bewertung:

gelesen: 16217

Beitrag als Lesezeichen
Hallo Markus,

man könnte ein Makro aufzeichnen, dass Dir die aktuelle Seite als Einzelseite mit Festwerten exportiert, dann natürlich als xlsb oder xls-Datei ...

Gruß
Klaus

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Leiti373
Beiträge gesamt: 43

2. Nov 2018, 09:35
Bewertung:

gelesen: 16162

Beitrag als Lesezeichen
Hallo zusammen,

danke für eure Tips!
Ich habs jetzt so gemacht, dass ich mir ein paar Makros mit meinem bescheidenen Wissen über VBA zusammen gestöpselt habe, die mir die Tabellenblätter wo ich die Zusammenstellungen habe, als einzelne XLSX ausspielen. Ist zwar jetzt nicht ganz so ideal weil ich mir solche Schritte eigentlich sparen wollte. Aber ich habe immerhin eine eindeutige Tabelle und das passt dann wieder.

Das mit dem "als Datei ohne Makros speichern" klappt leider nicht. Darauf wär ich gar nicht gekommen, weil mich Excel gar so rigoros drauf gedrängt hat, ein XLSM zu erstellen :D Aber eben, geht leider doch nicht auch wenn man versucht über die "Hintertür" das Ding zum funktionieren zu bringen...

Dennoch - Problem wurde so nun erfolgreich gelöst! :)

Und trotzdem - für mich nicht verständlich, warum InDesign sich sträubt, Formelergebnisse zu übernehmen.

LG,
Markus

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Klaus79
Beiträge gesamt: 341

3. Nov 2018, 23:29
Bewertung:

gelesen: 16118

Beitrag als Lesezeichen
Hallo Markus,
wenn Du es als EINE Datei benötigst, dann probier mal folgendes Makro:

Sub DateiKopierenNurWerte()
Dim wbNeu As Workbook
Dim wbAlt As Workbook
Dim sh As Worksheet
Dim i As Long
Dim Anz As Long
Set wbAlt = ActiveWorkbook
Anz = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = wbAlt.Sheets.Count
Set wbNeu = Workbooks.Add
Application.SheetsInNewWorkbook = Anz
Application.ScreenUpdating = False
'--- Daten kopieren nur Werte
For i = 1 To wbAlt.Worksheets.Count
wbAlt.Sheets(i).Cells.Copy
wbNeu.Sheets(i).Cells(1, 1).PasteSpecial xlPasteValues
wbNeu.Sheets(i).Cells(1, 1).PasteSpecial xlPasteFormats
wbNeu.Sheets(i).Name = wbAlt.Sheets(i).Name
Next
MsgBox "Fertig. Neue Datei bitte speichern"
End Sub

Das Makro erstellt eine neue Datei und kopiert nur die Werte. Am Ende kannst Du die Datei speichern als was Du willst ...

Gruß
Klaus

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Leiti373
Beiträge gesamt: 43

5. Nov 2018, 14:38
Bewertung:

gelesen: 16014

Beitrag als Lesezeichen
Hallo Klaus,

vielen Dank!
Das werde ich mir gut aufbewahren. Derzeit brauche bzw. möchte ich tatsächlich Einzeldateien. Das funktioniert besser für den Ablauf meiner Dokumentation.

LG,
Markus

Excel-Tabelle mit Zellinhalte aus SVERWEIS - keine Daten werden importiert

Klaus79
Beiträge gesamt: 341

5. Nov 2018, 17:34
Bewertung:

gelesen: 15988

Beitrag als Lesezeichen
Moin Markus,
mit Einzelseiten probier mal:

Sub EinzelseitenSpeichern()

Dim wbAlt As Workbook
Dim wbNeu As Workbook
Set wbAlt = ThisWorkbook
Dim strCopyName As String
Dim strPath As String
Dim strName As String
Dim i As Integer

strPath = ThisWorkbook.Path
If strPath = "" Then
MsgBox "Die Datei muß zuerst gespeichert werden"
Exit Sub
End if
If Right(strPath, 1) <> Application.PathSeparator Then
strPath = strPath & Application.PathSeparator
End if

Application.ScreenUpdating = False
Application.DisplayAlerts = False

For i = 1 To wbAlt.Worksheets.Count
strName = wbAlt.Worksheets(i).Name
strCopyName = strPath & strName & ".xlsx"
wbAlt.Worksheets(i).UsedRange.Copy
Set wbNeu = Workbooks.Add
With wbNeu
.Worksheets(1).Cells(1, 1).PasteSpecial xlPasteValues
.Worksheets(1).Cells(1, 1).PasteSpecial xlPasteFormats
.Worksheets(1).Name = wbAlt.Worksheets(i).Name
.SaveAs strCopyName, FileFormat:=xlOpenXMLWorkbook
.Close savechanges:=False
End With
Next i

Application.DisplayAlerts = True
Application.ScreenUpdating = True

Set wbAlt = Nothing
Set wbNeu = Nothing
MsgBox "Alle Seiten einzeln gespeichert"

End Sub

Klappt's ?

Gruß
Klaus