Thema Datum  Von Nutzer Rating
Antwort
Rot YES/NO Abfrage &
03.06.2009 08:53:07 j_ey_see
NotSolved
03.06.2009 10:44:25 Holger
NotSolved
03.06.2009 11:33:00 j_ey_see
NotSolved
08.07.2009 11:26:08 Der Beantworter
NotSolved
08.07.2009 12:41:10 Der Beantworter
NotSolved

Ansicht des Beitrags:
Von:
j_ey_see		 Datum:
03.06.2009 08:53:07		 Views:
1807		 Rating:
     
Antwort:
  Ja
Thema:
YES/NO Abfrage &
Hallo zusammen,

ich habe ein Problem. Vielleicht kann ja jemand weiterhelfen?

Ich habe eine Checkbox mittels welcher Zeilen gelöscht werden. (Das Zeilenlöschen an sich funktioniert schonmal.) Wenn man ein Häkchen setzt, soll aber noch abgefragt werden, ob die Aktion (also das Löschen) wirklich ausgeführt werden soll.

Bei der Antwort "nein" funktioniert das Ganze. Wenn ich aber in der Abfrage mit "ja" antworte, geschieht nichts.

Hier mein Quelltext:

Private Sub CheckBox1_Click()
CheckBox1.Locked = True

Dim i As Long
Dim Temp As Long, A As Assignment
Dim myTask As Task

MsgBox ("Are you sure deleting this task?"), vbYesNo, "Authentication"

If vbNo Then
CheckBox1.Value = False
Exit Sub
Else
For i = 1 To ActiveProject.Tasks.Count
Set myTask = ActiveProject.Tasks(i)
If (myTask.UniqueID = 218) Then
myTask.Delete
Exit Sub
End If
Next i
End If

End Sub


Sieht jemand den Fehler? Weiß jemand weiter?

Vorab lieben Dank!

Viele Grüße
j_ey_see

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot YES/NO Abfrage &
03.06.2009 08:53:07 j_ey_see
NotSolved
03.06.2009 10:44:25 Holger
NotSolved
03.06.2009 11:33:00 j_ey_see
NotSolved
08.07.2009 11:26:08 Der Beantworter
NotSolved
08.07.2009 12:41:10 Der Beantworter
NotSolved