Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Klick in Zelle - Before Change?
zurück: Namenbereich erweitern weiter: Vergleich von 2 Excel Doks mit Aktualisiertung von Daten 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
Gast



Verfasst am:
29. Jan 2009, 15:41
Rufname:

Klick in Zelle - Before Change? - Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

Heyho allesamt,

bin komplet neu in VBA, programmiere eigentlich JAVA nur im Moment lässt sichs nicht umgehen.
Gibt es in VBA eine Möglichkeit einer Before_Change() Methode? Ich will wenn ich in eine Zelle klicke eine MessageBox angezeigt bekommen, jedoch bevor diese geändert wird!
Geht darum, dass die vorhandenen Daten der Zelle nicht gelöscht werden dürfen, aber auch kein Button geht, da bei ~6000 Zeilen man für jede einen Button machen müsste. Ein globaler Button ist auch schlecht, da man nachher recht viele Vergleiche machen müsste.

Danke
ransi
Für den Hausgebrauch reicht's..


Verfasst am:
29. Jan 2009, 15:47
Rufname:
Wohnort: Im schönen Weserbergland


AW: Klick in Zelle - Before Change? - AW: Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

HAllo GAst

Zitat:
Ich will wenn ich in eine Zelle klicke eine MessageBox angezeigt bekommen...

Nutze doch das Worksheet_SelectionChange() um da etwas zwischenzuspeichern.

' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Zelle(n) " & Target.Address & " angeclickt."
End Sub



ransi
Gast



Verfasst am:
29. Jan 2009, 16:06
Rufname:

AW: Klick in Zelle - Before Change? - AW: Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

Coole Sache das klappt.
Jetzt kann ich über eine InputBox den neuen Wert der angefügt werden soll Abfragen - kann folgende Methode aufrufen:

/**
* newID : neue eingegebene ID
* row : die angeklickte Zeile (Spalte ist durch die Selection Range vorgegeben)
* oldVal : alter Wert in der Zelle
*/
public Sub update(newID As String, row As Long, oldVal As String)

Und da komm schon wieder die neue Frage: Wo bekomm ich die angeklickte Reihe her? Bzw noch besser wäre die Spezielle Zelle. Oder steht das in "ByVal Target".. kenn mich halt noch nicht mit den Datentypen aus Sad
Gast



Verfasst am:
29. Jan 2009, 16:08
Rufname:

AW: Klick in Zelle - Before Change? - AW: Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

Tschuldigung. Habs gefunden. Ich glaub ich registrier mich vor dem nächsten Beitrag^^
Raimund
Office-VBA-Programmierer


Verfasst am:
29. Jan 2009, 16:09
Rufname:
Wohnort: B-W

AW: Klick in Zelle - Before Change? - AW: Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

Hallo,

Ja Target ist ein Range(=Bereich), der liefert die angeklickte Zelle
Target.Address liefert die Adresse (z.b. wenn A1 neu ausgewählt wird, gilt: Target.Address = "$A$1")
Target.Row liefert die Zeile,
Target.Value den aktuellen Wert,...

_________________
Grüße
Raimund
Gast



Verfasst am:
30. Jan 2009, 09:48
Rufname:

AW: Klick in Zelle - Before Change? - AW: Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

Und nun doch noch eine Frage:

Habe eine Sub auf einem Sheet, welche eine andere Methode (Function) hier aufrufen soll, die aber "Allgemein" fürs ganze Workbook gilt.

Code:
Call foo()


ist soweit kein Problem, aberwie mach ichs wenn die Function jetzt einen Rückgabewert haben soll?
Raimund
Office-VBA-Programmierer


Verfasst am:
30. Jan 2009, 11:24
Rufname:
Wohnort: B-W


AW: Klick in Zelle - Before Change? - AW: Klick in Zelle - Before Change?

Nach oben
       Version: Office 2003

Hallo,

kommt auf den Rückgabewert an. Angenommen foo ist so definiert:
Code:
Function foo(ByVal lngZeile as Long) as String

dann liefert sie ja einen String zurück:

Beim Aufruf dann so z.B. so:

Code:
Dim strRueckgabe as String
strRueckgabe = foo(30)

_________________
Grüße
Raimund
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: in der Zelle nur die Formel schützen trotzdem etwas eingeben 1 MagicZimmis 1400 06. Feb 2005, 11:42
ae in der Zelle nur die Formel schützen trotzdem etwas eingeben
Keine neuen Beiträge Excel Formeln: Farbe einer Zelle bei bestimmten Wert automatisch verändern 4 Jatze 3564 03. Feb 2005, 23:48
Jatze Farbe einer Zelle bei bestimmten Wert automatisch verändern
Keine neuen Beiträge Excel Formeln: Flexible Referenz auf Zelle in anderem Blatt 2 Aloha 4555 31. Jan 2005, 15:35
Aloha Flexible Referenz auf Zelle in anderem Blatt
Keine neuen Beiträge Excel Formeln: Formel in Zelle nicht Sichtbar machen 5 Fire 8408 26. Jan 2005, 18:00
Fire Formel in Zelle nicht Sichtbar machen
Keine neuen Beiträge Excel Formeln: Dateinamen für zu öffnende Tabelle in Zelle vorgeben, wie? 4 excessor 1698 24. Jan 2005, 22:52
A.Knecht Dateinamen für zu öffnende Tabelle in Zelle vorgeben, wie?
Keine neuen Beiträge Excel Formeln: Teilinhalt einer Zelle in einer neuen Zelle kopieren 2 nastromo2001 2812 24. Jan 2005, 18:48
nastromo2001 Teilinhalt einer Zelle in einer neuen Zelle kopieren
Keine neuen Beiträge Excel Formeln: Worte aus einer Zelle in 2 Zellen schreiben 2 Sven79 1322 12. Jan 2005, 01:20
Sven79 Worte aus einer Zelle in 2 Zellen schreiben
Keine neuen Beiträge Excel Formeln: Bei der Formel "=C5-((B6-B5)*G3)" soll die Zelle G 2 Gast 1502 26. Nov 2004, 15:55
Gast Bei der Formel "=C5-((B6-B5)*G3)" soll die Zelle G
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: Leerzeichen in Zelle löschen 3 pkegelking 1807 01. Okt 2004, 11:57
pkegelking Leerzeichen in Zelle löschen
Keine neuen Beiträge Excel Formeln: inhalt einer zelle suchen und wiedergeben 2 winni 5568 23. Sep 2004, 16:47
winni inhalt einer zelle suchen und wiedergeben
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: HTML Forum