Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Userform öffnen, wenn bestimmte Zelle aktiv ist.
zurück: Prozentuale Abweichung weiter: Kundendaten speichern Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
blicki
Es wird langsam besser...


Verfasst am:
14. Mai 2007, 18:12
Rufname: Martin
Wohnort: Meerbusch

Userform öffnen, wenn bestimmte Zelle aktiv ist. - Userform öffnen, wenn bestimmte Zelle aktiv ist.

Nach oben
       Version: Office XP (2002)

Hallo wertes Forum,
ich bin nicht im Excel VBA zu hause und bitte um eure Hilfe.
Ich möchte ein Userform öffnen, wenn eine Zelle in einem definierten Zellbereich aktiv ist, sprich: Die Zelle in die man gerade was reinschreiben kann.
In dieser Zelle des Zellbereiches steht teilweise schon Text drin.
Um nicht die Spaltenbreite dieses Zellbereiches ändern zu müssen, soll der Zellinhalt der gerade aktiven Zelle quasi in einem Zoomfenster im Userform editierbar dargestellt werden. Beim schließen soll dann dieser Inhalt in die zuvor aktive Zelle geschrieben werden und eine Zelle ausserhalb dieses zu überwachenden Zellbereiches angesprungen werden, damit das Userform nicht sofort wieder aufgeht.
Mein Userform heisst "Zoomfenster" und der zu überwachende Zellbereich ist (L8:L24).
Ich habe mehrere Sheets, in denen überall der gleiche Zellbereich dieses Verhalten aufweisen soll.
Ich hoffe ihr könnt mir helfen.

_________________
Gruß Martin
Ein paar gesammelte Werke habe ich in der Beispiele.mdb,die ihr auf meiner HP findet, zusammengefasst.
blicki
Es wird langsam besser...


Verfasst am:
15. Mai 2007, 07:52
Rufname: Martin
Wohnort: Meerbusch


AW: Userform öffnen, wenn bestimmte Zelle aktiv ist. - AW: Userform öffnen, wenn bestimmte Zelle aktiv ist.

Nach oben
       Version: Office XP (2002)

Habs gerade selber herausgefunden:

Mit:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim Zeile As Long
Dim Spalte As Long

Zeile = Target.Row
Spalte = Target.Column

If Spalte = 12 Or Spalte = 21 Or Spalte = 30 Or Spalte = 39 Then
    If Zeile >= 8 And Zeile <= 24 Then
    Zoomfenster.Show
    End If
End If

End Sub

überprüfe ich die Zellbereiche und öffne das Userform.
Mit:
Code:
Private Sub UserForm_Activate()
    Me.txBemerkung.Value = ActiveCell.Value
End Sub

Übernehme ich den Wert in das Userform.
Mit:
Code:
Private Sub CommandButton1_Click()

Zoomfenster.Hide
ActiveCell.Value = Me.txBemerkung.Value

End Sub

Schreibe ich den Wert zurück in die Aktive Zelle und blende das Userform wieder aus.

_________________
Gruß Martin
Ein paar gesammelte Werke habe ich in der Beispiele.mdb,die ihr auf meiner HP findet, zusammengefasst.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Text aus Zelle übernehmen und in Formel einfügen! 5 Kannu 3212 07. Sep 2011, 15:55
Paul123 Text aus Zelle übernehmen und in Formel einfügen!
Keine neuen Beiträge Excel Formeln: Zelle soll automatisch farbig sein 14 claudy 3176 19. Jun 2006, 00:03
Gast Zelle soll automatisch farbig sein
Keine neuen Beiträge Excel Formeln: Userform 2 TonisPizza 826 10. Dez 2004, 14:34
TonisPizza Userform
Keine neuen Beiträge Excel Formeln: dateiname in eine zelle 6 natorius 1946 03. Dez 2004, 16:25
natorius dateiname in eine zelle
Keine neuen Beiträge Excel Formeln: Bezug auf Zelle -Ausgabe Formel 12 Patrick0705 2568 26. Nov 2004, 11:36
Arnim Bezug auf Zelle -Ausgabe Formel
Keine neuen Beiträge Excel Formeln: Teile aus einer Zelle übernehmen 5 Yakima 1980 23. Nov 2004, 17:06
Yakima Teile aus einer Zelle übernehmen
Keine neuen Beiträge Excel Formeln: Zelle farbig markieren 12 Gast 4192 05. Nov 2004, 01:25
Arnim Zelle farbig markieren
Keine neuen Beiträge Excel Formeln: Werte aus Liste mit Validation in Zelle 1 Gast 2516 18. Okt 2004, 15:20
icke Werte aus Liste mit Validation in Zelle
Keine neuen Beiträge Excel Formeln: SVERWEIS, Wert aus der nächsten zelle 9 Dave 5483 11. Okt 2004, 13:50
Dave SVERWEIS, Wert aus der nächsten zelle
Keine neuen Beiträge Excel Formeln: Letzten drei Ziffern aus einer Zelle filtern?? 7 Ben 3398 23. Sep 2004, 13:39
Gast Letzten drei Ziffern aus einer Zelle filtern??
Keine neuen Beiträge Excel Formeln: bestimmte Datensätze selektieren / Tabelle auswerten 0 tc_der_echte 1749 23. Sep 2004, 11:00
tc_der_echte bestimmte Datensätze selektieren / Tabelle auswerten
Keine neuen Beiträge Excel Formeln: Autom. Farbänderung einer Zelle. 1 Stefan 66 5197 19. Aug 2004, 14:51
fl618 Autom. Farbänderung einer Zelle.
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Access Tabellen