Office: button in excel

hallo schatzi,

nein kein hase sondern etwas ganz banales, aber ich habe ja schon gesagt dass ich mich nicht mit makro und VBA beschäftigt habe.

also folgendes:

ich habe zwei makros erstellt. eines das wenn ich eine tastenkombiation drücke streicht den inhalt der zelle durch auf der ich bin. das andere (bei einer anderen tastenkombination) schreibt in der zelle in der ich bin blau. ich brauche es so, dass es aber schon automatisch ( wenn ich die mappe aufmache und etwas ergänze) blau schreibt.

ich brauche außerdem einen button der ,wenn ich drücke, veranlasst, dass alle texte in excel die durchgestrichen sind gelöscht werden und alle texte die blau sind schwarz werden.

dankeschön für die hilfe :mrgreen:

 

Hallo!

Du hast offensichtlich Großes vor...
Öffne mit Alt+F11 aus der Mappe heraus den VBA-Editor und doppelklicke links oben auf "Diese Arbeitsmappe"
Diese Codes gehören ins Codefenster rechts:

Code:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Target.Font.ColorIndex = 5
End Sub

Sub FarbeNormal()
Dim Blatt As Object
Dim Zelle As Range
For Each Blatt In Sheets
For Each Zelle In Blatt.UsedRange
If Zelle.Font.ColorIndex = 5 Then Zelle.Font.ColorIndex = 1
If Zelle.Font.Strikethrough Then Zelle.Clear
Next Zelle
Next Blatt
End Sub

Blende dir nun über Menü Ansicht > Symbolleisten
die Leiste "Formular" ein.
Erstelle aus dieser Leiste einen Button an gewünschter Position und weise ihm das Makro "FarbeNormal" zu.
Je nach Umfang deiner Mappe kann die Ausführung des Makros länger oder kürzer dauern...

 

hallöchen,

das klappt schon ganz gut, aber da gibt es einige probleme:

1.wenn ich eine ganze zelle durchstreichen will geht das ganz gut, aber wenn ich nur ein teil in einer zelle duchstreichen möchte funktioniert das nicht, auch bein blau schreiben ist das so ne sachen. wenn ich in eine zelle schreibe ist es perfekt, aber wenn ich in eine zelle schreiben möchte die schwarz ist, wird dann alles schwarz, obwohl ich nur den neu geschriebenen teil blau haben möchte

2.in der selben arbeitsmappe habe ich auch das makros das in dem thema "automatische Arbeitsblatttitelwiedergabe" behandelt wurde eingebaut. jetzt ist es aber so, dass seit ich die oberen makros eingefügt habe, die titel der arbeitsblätter auch blau werden. welchen befehl muss ich in welches makro schreiben um dieses problem zu lösen.

3. und jetzt zum komplizierteren teil.
wenn ich diesen button drücke soll der blaue teil nicht nur schwarz werden und der durchgestrichene teil gelöscht werden, sondern es soll diese datei auch noch gespeichert werden und automatisch die neue version hervorgebracht werden. die neue version wo das blau schwarz ist und das durchgestrichen wegfällt. dann soll auch sobald ich den button drücke die frage kommen:

<JJJJ>-Dateiname

also der dateiname sollte immer gleich sein, niur das datum sollte änderbar sein.

oh man das ist jetzt viel auf einmal, aber ihr schafft das schon.

danke
christine

 

oh da fehlt noch was, es sollte heißen
<JJJJ>

 

hey, den teil lassen sie immer weg, ok ich probiers mal ohne klammer

JJJJ - MM - TT

ich hoffe es klappt jetzt

 

Hallo!
Ich verabschiede mich hiermit aus diesem Thread!
Ich habe absolut keine Lust, mir über Probleme Gedanken zu machen, von denen die Informationen immer nur bröckchenweise vorgeschmissen werden.

 

Sorry das ich dich damit vielleicht verärgert habe,
aber ich erhalte die info was da geschehen soll auch nicht an einem stück,
tut mir echt leid