Registriert seit: 01.11.2014
Version(en): 2007, 2010
Hallo Thomas,
dann so
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$L$1" Then Exit Sub
Tabelle3.Range("A1").Value = Tabelle3.Range("K1").Value & " " & Tabelle3.Range("L1").Value & " " & Replace(Tabelle3.Range("M1").Value, "/", " bzw. ")
End Sub
Gruß
Max
Registriert seit: 14.04.2014
Version(en): 2003, 2007
Hallo zusammen,
Max, das braucht man aber nicht wirklich. Das kann man auch, so wie ich es gezeigt habe, gleich mit der Formel erschlagen, aber unten ein weiterführender Vorschlag
@Thomas
Du kannst auch alles so lassen, wie bisher, wenn Du den Code so abänderst:
Code:
ChDir "C:\Users\Atilla\Desktop\Neuer Ordner"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Replace(Range("A1").Text, "/", "-") & "_" & Format(Date, "dd.mm.yyyy") & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
So wird nur im Namen der Schrägstrich geändert, aber in den Tabellen können sie bleiben.
Gruß Atilla
Registriert seit: 01.11.2014
Version(en): 2007, 2010
Hallo Atilla,
danke für die Anregung. Ich lerne noch :s.
Deswegen, und weil ich mich mit dem PDF-Export noch nie auseinandersetzen musste, hatte ich die Änderung im Blatt vorgenommen.
So war ich sicher, dass der Code funktioniert ohne den Dateipfad im Export-Makro anzupassen.
Hinzu kommt, dass ich zu Hause auf einer VM unter OS arbeite und es dort mit den Dateipfaden zuweilen etwas schwierig ist.
Das mit dem "/" hatte ich leider auch übersehen, von daher die Vermutung, dass es an der Formel lag.
Gruß
Max
Registriert seit: 05.10.2014
Version(en): 2013 Pro plus
23.11.2014, 20:59
(Dieser Beitrag wurde zuletzt bearbeitet: 23.11.2014, 21:03 von knallebumm.)
HAllo,
das funktioniert auch.
Allerdings wird jetzt direkt danach ohne zu fragen die Tabelle geschlossen.
Das war vor der Änderung nicht und es wurde doch nur der Name umgemodelt oder irre ich mich.?
Es soll nur die neue Tabelle geschlossen werden, die sich nach dem Speichern aufmacht und nicht die Ursprungstabelle.
Gruß
Thomas
Registriert seit: 14.04.2014
Version(en): 2003, 2007
Hallo Thomas,
bei mir bleibt die Vorlage geöffnet. Am Code ist auch nichts grundlegendes geändert worden.
Nur wenn im Namen ein "/" enthalten ist, wird dieser mit"-" ersetzt, sonst nichts.
Gruß Atilla
Registriert seit: 05.10.2014
Version(en): 2013 Pro plus
Hallo Attila,
sehe ich genauso.
Exel ist halt manchmal ein A....loch.
Ich mache jetzt aus google noch ein bischen nach sonstwas, fahre dann auf Montage.
So kann sich das Programm eine Woche erholen und regenerieren.
Bestimmt klappt es danach.
Melde mich wenn ich wieder da bin
Gruß
Thomas
Registriert seit: 10.04.2014
Version(en): 97-2019 (32) + 365 (64)
Hallo Thomas,
geschlossen wird nur im Makro "Ansetzungen_alle_Ligen_EXEL". Die Originaltabelle wird da nicht geschlossen. Das könnte aber z.B. passieren, wenn der code wegen einem Fehler oder einer Meldung angehalten hat und Du in dem Moment das Original wieder aktivierst. Dann bleibt stattdessen die Kopie offen.
. \\\|/// Hoffe, geholfen zu haben.
( ô ô ) Grüße, André aus G in T
ooO-(_)-Ooo (Excel 97-2019+365)