Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1692to1696
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1692to1696
1692to1696
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

vba mehrere Formen gleichzeitig ändern

vba mehrere Formen gleichzeitig ändern
13.05.2019 12:24:26
Kerstin
Hallöchen!
Habe mir schon die Finger wund gegoogelt, aber leider nicht passendes gefunden...
Wie kann ich mit VBA mehrere Objekte auf unterschiedlichen Tabellenblättern anwählen und mit einer wenn-dann-Abfrage die Eigenschaften gleichzeitig ändern?
Beispiel:
Tabellenblatt1, A1 = "rot" (geschrieben)
Tabellenblatt 2, Oval11, Oval2 (Form)
Tabellenblatt 3, Oval10, Oval 3 (Form)
Wenn Tabellenblatt A1 = "rot", dann Oval11 UND Oval10 rot färben. Die anderen Formen bleiben wie sie sind (rot färben habe ich schon, ich scheitere am gleichzeitigen anwählen der bestimmten Formen!)
Schon mal einen riesigen Dank im Voraus für eure Hilfe!
Liebe Grüße
Kerstin

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: vba mehrere Formen gleichzeitig ändern
13.05.2019 13:44:10
Werni
Hallo Kerstin
Mal ein Anfang: Ins Modul von Tabelle1 
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
If [A1] = "rot" Then
Tabelle2.Shapes.Range(Array("Oval 1")).Fill.ForeColor.RGB = RGB(255, 0, 0)
'etc
Else
Tabelle2.Shapes.Range(Array("Oval 1")).Fill.Visible = msoFalse
'etc
End If
End Sub
Gruss Werni
Anzeige

308 Forumthreads zu ähnlichen Themen

Was bedautet das ^ Zeichen in Formeln
Rocky

Hallo Excelfreunde,
bin jetzt des öffteren auf Formeln gestoßen die dieses Zeichen drin haben: ^
Was heißt das? und macht es?
Danke an alle
Gruß Rocky
25.11.2008 10:39:00
Thread-ID: 1027608
3 Beiträge
Anzeige
aktive Zelle mit einer Tastenkombination vergrö
Karsten


Hallo...
Gibt es die Möglichkeit, die aktive Zelle mit einer Tastenkombination zu vergrößern?
Danke für eure Hilfe.
Gruß
Karsten
25.02.2009 12:57:23
Thread-ID: 1053854
6 Beiträge
Sonderzeichen als Ergebnis einer Formel
MikeS

Hallo,
gibt es eine Möglichkeit, in der nachfolgenden Formel das Sonderzeichen VOLLER BLOCK zu wiederholen?
Ich möchte mir eine separate Hilfszelle sparen.
Das nachfolgende Beispiel ergibt leider einen Fehler!
=WIEDERHOLEN(█;B7*8)
Vielen Dank
Mike
02.03.2009 09:11:00
Thread-ID: 1055413
2 Beiträge
Anzeige
Gültigkeitsprüfung in Bezug auf mehrere Zellen
Erwin

Geschätztes Forum!
Ich möchte gerne eine Gültigkeit definieren und zwar:
Wenn in Zelle A1 oder B1 oder C1 etwas steht, dann darf in Zelle D1 nichts mehr geschrieben werden oder alternativ in Zelle D1 nur mehr 0 (null) stehen. Bitte ohne VBA.
Danke im Voraus für Eure Hilfe !!!
Er...
09.07.2009 14:45:07
Thread-ID: 1087437
5 Beiträge
Was bedeutet das Zeichen "^" in Formeln
Merlin

Was bedeutet das Zeichen "^" in Formeln?
21.10.2009 10:45:46
Thread-ID: 1111008
6 Beiträge
Anführungszeichen in Formel notwendig
Rene

Hallo Zusammen
Ich habe eine Formel, die ich so einsetzen muss:
=bpContent("Grob, Rene";"_phone")~f~ --> Im Hintergrund läuft dann via ein Add-In eine DB-Abfrage und in der entsprechenden Zelle wird mir dann die "phonenummer" reingeschrieben.
Ich möchte nun mit dieser Form...
15.12.2009 10:44:33
Thread-ID: 1123976
18 Beiträge
Suchen von Zeichen in Formeln
sam
Hi Frank,du hast es erraten. "Bearbeiten" - "Ersetzen" (oder [STRG]+Hund wenn du es im VB brauchst, schlage ich vor, du läßt dir die Befehle aufzeichnen.
Gruß,
Sam
15.04.2002 11:25:20
Thread-ID: 113337
4 Beiträge
Wenn-Formel in Abh. von 1. Zeichen in Zelle
1.

Hallo zusammen,
kennt jemand eine Wenn-Funktion die das erste Zeichen einer Zelle bewertert?
Sachverhalt:
A1: 0123423; die erste Ziffer ist eine Null
A2: 1123423; die erste Ziffer ist keine Null
Der Zellinhalt (A1 und A2) stellt Filialnummern dar, die je nachdem ob vorne ei...
17.02.2010 14:13:20
Thread-ID: 1139231
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
11
5
1
2
4
5
17
3
2
5
3
13
2
5
3
2
5
12
6
2
5
2
1
4