Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1360to1364
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1360to1364
1360to1364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehler in Wertzuweisung Variable

Fehler in Wertzuweisung Variable
14.05.2014 16:26:17
Sebastian
Hallo Forum
Ich habe im Modul eine Variable definiert (ich hoffe, dies ist grundsätzlich erst einmal richtig; die Variable muss aus verschiedenen Userforms ansprechbar und nutzbar sein):
Public neuer_ÜL As String.
In einem UserForm dann folgendes Sub:
Private Sub Name_zuweisen()
Dim nn, vn As String
nn = InputBox("NACHname des neuen Übungsleiters:", "Neuer Übungsleiter")
vn = InputBox("VORname des neuen Übungsleiters:", "Neuer Übungsleiter")
neuer_ÜL = nn + ", " + vn
End Sub
Die Zuweisung neuer_ÜL = nn + ", " + vn wirft aber stets die Fehlermeldung aus "Unzulässige Verwendung einer Eigenschaft".
Kann mir bitte jemand sagen, wo mein Fehler liegt bzw. wie ich einer übergeordnet definierten Variablen einen Wert zuweisen kann?
Danke vorab :)

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehler in Wertzuweisung Variable
14.05.2014 16:28:30
selli
hallo sebastian,
verwende & statt +
gruß
selli

AW: Fehler in Wertzuweisung Variable
14.05.2014 16:39:58
Sebastian
Hallo Selli
Ich hatte gehofft, es wäre so einfach.
Die fehlermeldung bleibt die gleiche...

AW: Fehler in Wertzuweisung Variable
14.05.2014 16:43:48
selli
hallo sebastian,
hast du die variable "neuer_ÜL" auch so deklariert, dass sie für alle module zugänglich ist?
Public neuer_ÜL As String
an den anfang eines moduls (nicht innerhalb einer sub routine) schreiben.
gruß
selli

AW: Fehler in Wertzuweisung Variable
14.05.2014 16:50:18
Sebastian
@Selli: 
hast du die variable "neuer_ÜL" auch so deklariert, dass sie für alle module zugänglich ist?
Public neuer_ÜL As String
an den anfang eines moduls (nicht innerhalb einer sub routine) schreiben.
Ja, Public neuer_ÜL As String steht im Modul ganz oben, unabhängig einer Sub.
@Rudi:
"Wie definiert" hatte ich bereits in meinem Ausgangspost dargestellt (steht aber jetzt auch hier nochmal, siehe oben). 
In VarNamen würde ich keine Umlaute verwenden.
"würde" bringt mich leider nicht weiter :( Der Fehler erscheint auch, wenn ich keine Umlaute verwende

Anzeige
AW: Fehler in Wertzuweisung Variable
14.05.2014 16:58:44
Rudi
Hallo, 
Private Sub Name_zuweisen()
Dim nn As String, vn As String
nn = InputBox("NACHname des neuen Übungsleiters:", "Neuer Übungsleiter")
vn = InputBox("VORname des neuen Übungsleiters:", "Neuer Übungsleiter")
neuer_ÜL = nn & ", " & vn
End Sub

funzt tadellos.
Lad mal deine Mappe hoch.
Gruß
Rudi

AW: Fehler in Wertzuweisung Variable
14.05.2014 17:21:36
Sebastian
Im Modul steht:
Option Explicit
Public Anzahl_ÜL As Long
Public Status As Boolean
Public Aktueller_Monat As Long
Public Überschrift As String
Public Journal_Index As Long
Public neuer_ÜL As String
Im Userform steht:
Private Sub CommandButton9_Click()
Dim vn As String, nn As String
Dim i As Long
Hauptmenü.Hide
nn = InputBox("NACHname des neuen Übungsleiters:", "Neuer Übungsleiter")
vn = InputBox("VORname des neuen Übungsleiters:", "Neuer Übungsleiter")
neuer_ÜL = nn & ", " & vn
If neuer_ÜL  "" Then
For i = 1 To 100
If Worksheets("2014").Cells(i, 1) = neuer_ÜL Then
MsgBox "Der Übungsleiter " & neuer_ÜL & " ist bereits vorhanden!",  _
vbCritical, "FEHLER"
GoTo überspringen
End If
Next i
For i = 1 To 100
If Worksheets("2014").Cells(i, 1) = "" Then
Anzahl_ÜL = Anzahl_ÜL + 1
Cells(i, 1) = neuer_ÜL
MsgBox "Übungsleiter (" & neuer_ÜL & ") angelegt"
Exit For
End If
Next i
End If
überspringen:
Hauptmenü.Show
End Sub
Starte ich nun das Userform und klicke auf den CommandButton9 erscheint die besagte Fehlermeldung und der Text "neuer_ÜL =" wird markiert.
PS: Da ich aktuell einen dienstlichen PC benutze, kann ich die Datei nicht hochladen, sorry.

Anzeige
Code funktioniert. owT
14.05.2014 18:39:12
Rudi

AW: Code funktioniert. owT
14.05.2014 18:40:24
Sebastian
Da ich nicht weiß, was "owT" bedeuten soll und der Code bei MIR leider nach wie vor nicht funktioniert, hoffe ich noch auch weitere Hinweise, wo wohl der Fehler liegen mag.

nicht ohne die Datei
14.05.2014 23:37:09
Rudi
Hallo,
da der Codeschnipsel formal richtig ist (auch wenn's besser geht), kann ohne die Datei nichts weiteres gesagt werden.
owT = ohne weiteren Text
Gruß
Rudi

AW: Fehler in Wertzuweisung Variable
14.05.2014 16:43:54
Rudi
Hallo,
wie ich einer übergeordnet definierten Variablen
wie definiert?
In VarNamen würde ich keine Umlaute verwenden.
Gruß
Rudi

208 Forumthreads zu ähnlichen Themen

@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Anzeige
Und() bzw. ODER() in Matrixformeln
Sibylle

Hallo,
sollen in einer Matrixformel 2 Bedingungen durch UND() verknüpft werden, funktioniert dies nicht.
Was ist die Ursache?
Wichtiger: wie sieht die Lösung aus?
Gruß
Sibylle
13.02.2009 11:02:00
Thread-ID: 1050412
9 Beiträge
Im Diagramm Formel in Diagrammbeschriftung oder...
martin

... Datenbeschriftung aus eigener Zelle.
Guten Morgen allerseits.
1.) Gerne würde ich in der Datenbeschriftung eines Diagrammes etwas ausrechnen lassen (ohne dass das Diagramm verändert wird). Geht das? In meinem Beispiel Wäre das := 100% - Wert in %
2.) Wenn das nicht geht, würde i...
05.06.2009 09:31:26
Thread-ID: 1079339
2 Beiträge
Anzeige
Was bedeutet das Zeichen "^" in Formeln
Merlin

Was bedeutet das Zeichen "^" in Formeln?
21.10.2009 10:45:46
Thread-ID: 1111008
6 Beiträge
Formel nur einmal berechnen oder ?
alex

Hi Profis,
hier mein Problem - https://www.herber.de/bbs/user/69683.xlsx
Bei der Lohnberechnung dürfen bereits berechnete Zellen nicht noch einmal Berechnet werden.
Habt Ihr einen Lösungsvorschlag.
Darstellung und Erläuterung in der angehängten Datei.
Danke schon einmal für...
21.05.2010 18:11:35
Thread-ID: 1158332
10 Beiträge
Was bedeutet >>For colIndex
Dietmar

Hallo in die Abendrunde,
kann mir jemand diesen Code erklären? Es scheint ein AusleseCode zu sein, der das Sheet als Textdatei ausliest.
Ich will das zugrundeliegende Sheet neu gestalten.
Meine Frage:
Kann es sein dass der Code Daten ausliest, die farblich hinterlegt sind? Wenn...
01.07.2010 21:16:52
Thread-ID: 1165012
5 Beiträge
Sverweis gibt bei Nullwert Datum zurück?
Sebastian

Hallo zusammen,
mein Sverweis sucht mir ein Datum. Wenn jedoch kein Wert eingetragen ist, dann gibt er mir das Datum "00.01.1900" aus. Wie kann ich das verhindern?
=WENN(ISTNV(SVERWEIS(AP1055;'Tabelle1'!G:BP;62;FALSCH));"";SVERWEIS(AP1055;'Tabelle1'!G:BP;62;FALSCH) )
Danke u. Gruß
15.11.2010 16:34:32
Thread-ID: 1186882
7 Beiträge
VBA Fehlermeldung bei Verknüpfung mit Datenbank
Max

Hi liebes Herber Excel Forum
Ich bin neu hier und bin gerade dabei ein bisschen in VBA zu programmieren
Bin grad dabei eine Access Datenbank über VBA mit Excell zu verknüpfen. Alles kein Problem. Beim Starten erscheint die Userform ordnungsgemäß, aber dann kommt die Fehlermeldung "Objek...
20.04.2011 08:40:38
Thread-ID: 1211120
2 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
13
8
1
3
5
9
4
6
1
3
2
2
4
3
2
5
2
4
4
6
2
1
2
3