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

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Print/Bildbearbeitung - Photos, Layout, Design
Themen
Beiträge
Moderatoren
Letzter Beitrag

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

Leiti373
Beiträge gesamt: 43

31. Okt 2018, 15:17
Beitrag # 1 von 7
Bewertung:
(2229 mal gelesen)
URL zum Beitrag
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
X

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

MarioF
Beiträge gesamt: 193

1. Nov 2018, 15:20
Beitrag # 2 von 7
Beitrag ID: #567296
Bewertung:
(2177 mal gelesen)
URL zum Beitrag
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


als Antwort auf: [#567273]

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

Klaus79
Beiträge gesamt: 307

1. Nov 2018, 15:41
Beitrag # 3 von 7
Beitrag ID: #567297
Bewertung:
(2169 mal gelesen)
URL zum Beitrag
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


als Antwort auf: [#567273]

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

Leiti373
Beiträge gesamt: 43

2. Nov 2018, 09:35
Beitrag # 4 von 7
Beitrag ID: #567312
Bewertung:
(2114 mal gelesen)
URL zum Beitrag
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


als Antwort auf: [#567297]

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

Klaus79
Beiträge gesamt: 307

3. Nov 2018, 23:29
Beitrag # 5 von 7
Beitrag ID: #567340
Bewertung:
(2070 mal gelesen)
URL zum Beitrag
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


als Antwort auf: [#567312]

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

Leiti373
Beiträge gesamt: 43

5. Nov 2018, 14:38
Beitrag # 6 von 7
Beitrag ID: #567361
Bewertung:
(1966 mal gelesen)
URL zum Beitrag
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


als Antwort auf: [#567340]

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

Klaus79
Beiträge gesamt: 307

5. Nov 2018, 17:34
Beitrag # 7 von 7
Beitrag ID: #567364
Bewertung:
(1940 mal gelesen)
URL zum Beitrag
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


als Antwort auf: [#567361]
Hier Klicken X

Aktuell

PDF / Print
PitStop_2019

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
17.10.2019

Digicomp Academy AG, Limmatstrasse 50, Zürich
Donnerstag, 17. Okt. 2019, 18.00 - 20.30 Uhr

Vortrag

Farben sind ein wichtiges Gestaltungselement in Corporate Design und Branding. Als Sinneseindruck, der von Beleuchtung, Materialeigenschaften und Kontext abhängt, ist eine Farbe jedoch schwer zu fassen. Der Verein freieFarbe setzt sich für eine offene, digitale Farbkommunikation ein und hat hierzu das HLC-Farbsystem entwickelt. Dieses hilft, zwischen Gestaltung am Computer, physischen Farbmustern und unterschiedlichen Verfahren in der Produktion eine Brücke zu schlagen. Es basiert zudem auf bestehenden ISO-Standards für die Druckindustrie.

Donnerstag, 17. Oktober 2019, 18 bis 20.30 Uhr

Ja

Organisator: Digicomp Academy AG

https://www.meetup.com/de-DE/Publishing-Group-Switzerland/events/264611769/

Freie Farbe für die digitale Zukunft
Veranstaltungen
21.10.2019 - 22.10.2019

München
Montag, 21. Okt. 2019, 09.30 Uhr - Dienstag, 22. Okt. 2019, 17.30 Uhr

Schulung, Seminar

Wer hochwertige und farbechte Ergebnisse im Digitaldruck erzielen will, der braucht umfassende Colormanagemement- und PDF-Kenntnisse. Selbst wenn die Maschine kalibriert und das Rip richtig konfiguriert ist, lassen die Ergebnisse oft zu wünschen übrig. Der Grund hierfür liegt zu 90 % in den Daten und in falsch eingestellten Anwendungsprogrammen, auch in falschen Einstellungen im Druckmenü.

Nein

Organisator: Cleverprinting.de

https://www.cleverprinting.de/zweitaegige-weiterbildung-zum-digitaldruck-operator/

Zweitägige Weiterbildung zum Digitaldruck-Operator