Zellen automatisch nach Ereignis verbinden

20/09/2013 - 16:44 von mermegil | Report spam
Hallo,
ich habe folgende Aufgabenstellung, die mich ein bisschen verzeifeln làsst.
Das Beispiel: Wenn in Zelle c3 das Wort Krise, welches über eine Dropdownliste ausgewàhlt wird, steht, soll der Zellbereich D1:J9 automatisch verbunden werden. Ich weiß, dass da nicht über die WENNfunktion geht. Hat irgendwer eine andere Lösung. Meine VB Kenntisse da leider zu bescheiden um selber eine Lösung zu basteln.
Vielen Dank für eure Zeit

Stefan
 

Lesen sie die antworten

#1 Claus Busch
20/09/2013 - 17:03 | Warnen spam
Hallo Stefan,

Am Fri, 20 Sep 2013 07:44:22 -0700 (PDT) schrieb :

ich habe folgende Aufgabenstellung, die mich ein bisschen verzeifeln làsst.
Das Beispiel: Wenn in Zelle c3 das Wort Krise, welches über eine Dropdownliste ausgewàhlt wird, steht, soll der Zellbereich D1:J9 automatisch verbunden werden. Ich weiß, dass da nicht über die WENNfunktion geht. Hat irgendwer eine andere Lösung. Meine VB Kenntisse da leider zu bescheiden um selber eine Lösung zu basteln.



klicke rechts auf den Tabellenreiter des entsprechenden Blattes und
wàhle Code anzeigen. Füge dann dort folgenden Code ein:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$C$3" Then Exit Sub
Range("D1:J9").MergeCells = (Target = "Krise")
End Sub

Wenn in C3 wieder ein anderer Eintrag gewàhlt wird, wird der Zellverbund
wieder aufgelöst.
Ich arbeite nicht gerne mit verbundenen Zellen, denn sie machen u. a.
Schwierigkeiten beim Filtern, Sortieren und Ansprechen.


Mit freundlichen Grüßen
Claus
Win XP Prof SP3 / Vista Ultimate SP2
Office 2003 SP3 /2007 Ultimate SP3

Ähnliche fragen