[GastForen Programme Office Microsoft Office Makro die Zweite

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Office - Alles fürs Büro
Themen
Beiträge
Moderatoren
Letzter Beitrag

Makro die Zweite

Dexxa
Beiträge gesamt: 28

27. Sep 2006, 18:53
Beitrag # 1 von 2
Bewertung:
(721 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Und nochmals guten Tag,
ich möchte ein Makro erstellen, das wie ein On/Off Schalter funktioniert.
Bei On.....schreibt das Makro xyz
Bei Off.....entfernt das Makro xyz, sofern xyz steht.

Geht das?

Danke für die Hilfe
X

Makro die Zweite

Klaus79
Beiträge gesamt: 320

27. Sep 2006, 22:14
Beitrag # 2 von 2
Beitrag ID: #253488
Bewertung:
(712 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Dexxa

Für Excel probier mal das:

Sub Toggle_ON_OFF()
ActiveSheet.Shapes("Button 1").Select 'Button 1 muss evtl. angepasst werden
If Selection.Characters.Text = "ON" Then
Selection.Characters.Text = "OFF"
With Selection.Characters(Start:=1, Length:=3).Font
.Name = "Arial"
.FontStyle = "Standard"
.Size = 8
.OutlineFont = True
.Underline = xlUnderlineStyleNone
.ColorIndex = 1
End With
MsgBox "Hier kommt Makro 1"
Else
ActiveSheet.Shapes("Button 1").Select
Selection.Characters.Text = "ON"
With Selection.Characters(Start:=1, Length:=2).Font
.Name = "Arial"
.FontStyle = "Standard"
.Size = 8
.OutlineFont = False
.Underline = xlUnderlineStyleNone
.ColorIndex = 3
End With
MsgBox "HIER KOMMT MAKRO 2"
End If
Range("A1").Select
End Sub


Ob es auch für WORD funktioniert weis ich allerdings nicht

Gruß
Klaus


als Antwort auf: [#253467]
(Dieser Beitrag wurde von Klaus79 am 27. Sep 2006, 22:18 geändert)

Aktuell

InDesign / Illustrator
ScreenShot 274 Warum Templates in InDesign benutzen_ - Satzkiste in Stuttgart - Satz und technische Umsetzung - Google Chrome (300x300 HilfDirSelbst)

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
02.02.2023

Prozesse optimieren und effizient gestalten

Zürich
Donnerstag, 02. Feb. 2023, 08.00 - 10.00 Uhr

Digitalisierung, Webauftritt

Digitalisierung mitgestalten - Worauf kommt es an? Wie wichtig ist die Webseite? Webseite mit Word Press? Interne Prozesse optimieren

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: Birol Isik, E-Mailinfo AT bkcc DOT ch

https://digitalisierung-heute.ch/digitalisierung-informationstag-schweiz/

Veranstaltungen
01.03.2023 - 09.03.2023

Online
Mittwoch, 01. März 2023, 00.00 Uhr - Donnerstag, 09. März 2023, 00.00 Uhr

Online Webinar

Wie gehen wir mit diesen Veränderungen um? Was ist notwendig, damit wir die Digitalisierung im Unternehmen klappt? Veränderungsprozesse verstehen und entsprechend handeln Mitarbeiter als Botschafter Webseite mit WordPress erstellen SEA /SEO (Ads aufschalten)

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: B. Isik, E-Mailinfo AT snfa DOT ch

https://www.fernstudiumfitness.ch/digitalisierung-schweiz/