[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: 40

31. Okt 2018, 15:17
Beitrag # 1 von 7
Bewertung:
(919 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: 122

1. Nov 2018, 15:20
Beitrag # 2 von 7
Beitrag ID: #567296
Bewertung:
(867 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: 306

1. Nov 2018, 15:41
Beitrag # 3 von 7
Beitrag ID: #567297
Bewertung:
(859 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: 40

2. Nov 2018, 09:35
Beitrag # 4 von 7
Beitrag ID: #567312
Bewertung:
(804 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: 306

3. Nov 2018, 23:29
Beitrag # 5 von 7
Beitrag ID: #567340
Bewertung:
(760 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: 40

5. Nov 2018, 14:38
Beitrag # 6 von 7
Beitrag ID: #567361
Bewertung:
(656 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: 306

5. Nov 2018, 17:34
Beitrag # 7 von 7
Beitrag ID: #567364
Bewertung:
(630 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]
X

Aktuell

Quark / Adobe / Apple / Microsoft
qxp300

Veranstaltungen

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen. pdf-icon Hier eine kleine Anleitung.

Veranstaltungen
24.01.2019

Impressed GmbH, Hamburg
Donnerstag, 24. Jan. 2019, 10.00 - 10.30 Uhr

Webinar

Wir stellen Ihnen in diesem kostenlosen ca. halbstündigen Webinar das neue Enfocus Switch PDF Review Modul zur Freigabe von PDF-Druckdaten vor. Wir zeigen Ihnen, wie Sie die Lösung in bestehende Enfocus Switch-Workflows einbinden und somit die Freigabeprozesse mit Ihren Kunden erheblich beschleunigen können.

Ja

Organisator: Impressed GmbH

Kontaktinformation: Detlef Grimm, E-Mailschulungen AT impressed DOT de

https://www.impressed.de/schulung.php?c=sDetail&sid=250

Enfocus Switch PDF Review Modul
Veranstaltungen
24.01.2019

Hochschule der Medien, Stuttgart
Donnerstag, 24. Jan. 2019, 18.00 Uhr

Vortrag

Wie jedes Jahr im Januar besucht uns Monika Gause mit Neuigkeiten zu Illustrator und aus der restlichen Publishing-Welt. Der Abend ist pickepacke voll: Zunächst zeigt uns Monika alles Neue, was uns Adobe in Illustrator 2019 gepackt hat. Anschließend zeigt sie verschiedenen Möglichkeiten der realistischen Darstellung: Verläufe, Verlaufsgitter, Angleichungen und wie man sie in den Griff bekommt. Dazu gehört auch die Vorstellung des kostenlosen Plugin Mesh Tormentor. Abgeschlossen wird mit dem "Best-of" aus einem Infografik/Dokumentation-Seminar, das Monika letztes Jahr in München gehalten hat. Es ist nicht nötig Tickets zu kaufen oder eine Registrierung durchzuführen. Komme einfach vorbei! Wir freuen uns Katharina Frerichs und Christoph Steffens

Kostenlos, Ticketkauf oder Anmeldung ist nicht nötig.

Nein

Organisator: IDUG Stuttgart

Kontaktinformation: Christoph Steffens, E-Mailchristoph.steffens AT gmail DOT com

Illustrator mit Monika Gause