Tabellenkalkulation

Button in Excel erstellen

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

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 1 von Hajo_Zi

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

Hey,

danke für die schnelle Antwort.

Kann ich einem Button auch eine Wenn Dann Bedingung zuweisen?

Gruß

Michael

Antwort 3 von Hajo_Zi

Hallo Michael,

If ..

Gruß Hajo

Antwort 4 von Michael_B

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

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

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

Danke, habe es noch bisschen verändert und nun funktioniert es einwandfrei.

Danke.

Gruß