Abfrage verbundener Zellen

Forumthread: Abfrage verbundener Zellen

13.08.2024 10:27:34

Dirk

Moin Moin zusammen!

Ich habe eine kleine Aufgabe an die VBA Experten, an der ich aktuell nicht weiterkomme.

Beim Öffnen einer Datei wird abgefragt, ob Zelle 1 (nicht verbundene Zelle) und Zelle 2 (verbundene Zelle) leer sind. Ist dies der Fall, öffnet sich eine UserForm. In dieser UserForm sind zwei OptionButton und zwei Schaltflächen (Übernahme und Abbrechen) enthalten. Bei Übernahme wird je nach Auswahl OptionButton 1 oder 2 ein Wert in Zelle 1 übernommen, bei Abbrechen wird die UserForm ohne Wertübernahme geschlossen. Das alles klappt auch soweit.

So, jetzt zum Problem: Sind Zelle 1 und Zelle 2 leer und klicke ich in der geöffneten Datei nun auf die Zelle 2, soll die UserForm dann wieder geöffnet werden, wenn die Zelle 2 ausgewählt wurde und die Zelle 1 (befindet sich in einem anderen Tabellenblatt) leer ist.
Das mit der Abfrage ob Zelle 1 leer ist oder nicht, bekomme ich noch hin; an der Abfrage ob Zelle 2 ausgewählt wurde, komme ich jedoch nicht weiter.

Danke im Voraus
Gruß
Dirk

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Abfrage verbundener Zellen

13.08.2024 10:45:05

GerdL
AW: Abfrage verbundener Zellen

13.08.2024 11:00:59

Oberschlumpf
AW: Abfrage verbundener Zellen

13.08.2024 14:54:46

Dirk
AW: Abfrage verbundener Zellen

13.08.2024 11:30:55

GerdL

AW: Abfrage verbundener Zellen

13.08.2024 10:45:05

GerdL

Hallo Dirk!
Kopiere diese Prozedur ins Modul der Tabelle mit der verbundenen Zelle A2.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)



    If Target.Address = Range("a2").MergeArea.Address Then

        If IsEmpty(Range("a2")) Then MsgBox "mach was: Userform1.Show"

    End If



End Sub

Gruß Gerd

AW: Abfrage verbundener Zellen

13.08.2024 11:00:59

Oberschlumpf

Hi Gerd,

hab mir jetzt nich alles von Dirk haarklein durchgelesen, aber kann es vllt sein, dass du in deinem Code das abschließende " an die falsche Stelle gesetzt hast? ;-)

Ciao
Thorsten

AW: Abfrage verbundener Zellen

13.08.2024 14:54:46

Dirk

Hallo GerdL,

danke für die schnelle Hilfe.
Habe die zweite If-Anweisung noch auf die Abfrage der Zelle 1 angepasst..., klappt perfekt.

Gruß
Dirk

AW: Abfrage verbundener Zellen

13.08.2024 11:30:55

GerdL

Hi Thorsten,

denke nein. Denn das ist in der Messagebox nur Pseudocode.

LG GL

Beliebteste Forumthreads (12 Monate)

Forumthread: Abfrage verbundener Zellen

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread