Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Tabellenwert mit Befehlsschaltfläche ändern

Begonnen von Tomy, Mai 23, 2011, 10:28:01

⏪ vorheriges - nächstes ⏩

Tomy

Moin Moin!

Da ich leider nur ein VBA Laie bin, bräuchte ich eure Hilfe.

Ich möchte gerne in meinem Formular einen Wert mittles Befelsschaltfläche ändern.

Der Wert ist entweder von "N" auf "Y" oder von "Y" auf "N" umzustellen. Die Befehlsschaltfläche heißt dabei "Change".

Im Prinzip müsste es doch in etwa so aussehen: (Toolbox ist das zu ändernde Feld)

If Me!Toolbox.Value = Y Then
  Me!Toolbox.Value = N
    Else
  Me!Toolbox.Value = Y
End If

Dann erscheint der Fehler 2448:
Sie können diesem Objekt keinen Wert zuweisen.

Vielen Dank schon mal für die Hilfe!

Grüße Tomy

DF6GL

#1
Hallo,


Sub Change_Click()
If Me!Toolbox= "Y" Then
  Me!Toolbox= "N"
    Else
  Me!Toolbox= "Y"
End If
End Sub


wobei die Schaltfläche "Change" besser in z. B. "btnChange"  umbenannt werden sollte, weil es sich hier um ein reserviertes Wort  handelt.

Weiterhin muß "Toolbox" ein an ein Tabellenfeld (vom Datentyp "TEXT")   gebundenes Formular-Steuerelement sein, wenn sich ein Tabellenfeld aktualisieren soll

Tomy

Okay, nun bekomme ich den Laufzeitfehler 3326.
Liegt es daran, dass der Wert aus einer verknüpften Excel Tabelle stammt und er sich deshalb nicht ändern lässt?

Besten Dank!

DF6GL

Hallo,

ja...


Solche Nebensächlichkeiten solltest Du gleich Anfangs mitteilen...   ::)

Tomy

Sorry, ich dachte nicht, dass es ein Problem werden könnte.
Eine einfache Möglichkeit dies zu entgehen gibt es bestimmt nicht, oder?

MzKlMu

Hallo,
ZitatEine einfache Möglichkeit dies zu entgehen gibt es bestimmt nicht, oder?
Nein, dies Funktionalität musste Microsoft wegen Patentsverletzungen wieder entfernen. Excel kann aus  Access nicht aktualisiert werden.
Gruß Klaus