Hallo,
suche dringend ein Makro, dass mir in der ausgewählten Zelle per Symbolklick die komplette Pfadangabe der Datei andruckt.
Kirstin
Office - Word, Excel und Co. 9.753 Themen, 41.598 Beiträge
Hallo Kirstin,
hier das "Makro":
Sub Dateinamen_einfuegen()
ActiveCell.Value = "=CELL(""Dateiname"")"
End Sub
dann mußt Du Dir nur noch einen Button anlegen.
cu
Stefan
Hallo Stefan,
mit dem Button sehe ich kein Problem, aber bei dem Makro bekomme ich immer die Fehlermeldung "424". Liegt das evtl. an der Excel-Version? Ich habe Excel 2000 im Einsatz.
Gruß Kirstin
Hi Kirstin,
ich habe das Makro auf 2000 getestet, da funktioniert es. Was sein kann: statt cell mal zelle ausprobieren.
Am besten im VB-Editor mit F8 das Makro Stück für Stück durchgehen. Dann findest Du den Fehler am besten.
cu
Stefan
Hi,
das Makro läuft doch, die Formatierung war aber auf „Text“ eingestellt.
Kann man das Makro so verändern, dass vor dem Einfügen der Pfadangabe erst die Zelle auf Standard formatiert wird?
Gruß Kirstin
Hi Kirstin,
einfach vor der Zeile noch folgendes eintragen:
ActiveCell.NumberFormat = "General"
cu
Stefan
Hi Stefan,
nun schreibt er mir in die Zelle aber nur die Formel und nicht den Pfad. Die Formatierung darf nicht Standard sondern Textformat sein. Was muss ich statt "General" eintragen? Ich kenne mich mit dieser Makrosprache zu 0,01% aus!! ;-)
Gruß Kirstin