Button in Excel erstellen
Hallo,
ich habe ein Problem in Excel 2007.
Ich würde gerne ein Button in einer Zelle erstellen der z.B. in B5 ist und diese Zeile löscht.
Außerdem würde ich gerne einen Button erstellen der das Dokument als PDF speichert, da Excel 2007 diese Funktion ja bietet.
Wer kann mir bei meinem Problem helfen?
Ist dies eigentlich realisierbar?
Vielen Dank schonmal
Gruß
Michael
Antwort schreiben
Antwort 1 von Hajo_Zi vom 20.06.2020, 16:32 Options
Hallo Michael,
zeichne den Code mit dem Makrorecorder auf.
Unter Optionen, Entwicklerregisterkarte aktivieren.
Im Neuen Register, Befehlsgruppe Steuerelemente, Einfüen und im obeneren Teil die Schaltfläche anklicken und jetzt in Tabelle aufziehen und das aufgezeichnete Makro zuweisen.
Gruß hajo
Antwort 2 von Michael_B vom 20.06.2020, 21:03 Options
Hey,
danke für die schnelle Antwort.
Kann ich einem Button auch eine Wenn Dann Bedingung zuweisen?
Gruß
Michael
Antwort 3 von Hajo_Zi vom 20.06.2020, 21:07 Options
Hallo Michael,
If ..
Gruß Hajo
Antwort 4 von Michael_B vom 20.06.2020, 21:36 Options
Danke :)
nun zu meiner letzten Frage...
wie kann ich denn das aktuelle Datum als Speichernamen festlegen
also der Dateiname soll lauten Michael (AKTUELLES DATUM)
Gruß
Antwort 5 von Michael_B vom 20.06.2020, 22:01 Options
Ich glaube ich habe mich etwas undeutlich ausgedrückt...
ich möchte gerne auf einen Button drücken und dann soll das Dokument mit dem Namen
Michael (AKTUELLES DATUM)
gespeichert werden..
Sry
Gruß
Antwort 6 von Hajo_Zi vom 21.06.2020, 08:18 Options
Hallo Michael,
meiner Meinung nach sollte ein Dateinname nur ein Punkt enthalten. Mit meinem Format hat man auch die bessere Übersicht, da sortiert nach Jahren, Monaten, Tagen
Ich habe jetzt keine Fehlerprüfung eingebaut ob schon vorhanden.
ThisWorkbook.SaveAs Filename:= _
"L:\Eigene Dateien\Hajo\Internet\Test\2008\Michael " & Format(Date, "yy_mm_dd") & ".xls", FileFormat _
:=xlExcel8
Gruß hajo
Antwort 7 von Michael_B vom 21.06.2020, 13:37 Options
Danke, habe es noch bisschen verändert und nun funktioniert es einwandfrei.
Danke.
Gruß