.Value und .Caption Eigenschaften bei UserForms (VBA)

Moin, ich verstehe etwas nicht so ganz ..

und zwar bin ich derzeit an userforms in vba bzw. excel zu Gange, dass läuft auch alles relativ gut, mein Problem ist nur, normalerweise benutze ich ja bei

txtGrundgebühr.Value = Grundgebühr

die .Value Eigenschaft, aber wann benutze ich denn .Caption?

Ich weiß, dass Programm funktioniert auch ohne, aber wann benutze ich welches?

Vielen dank für eine Antwort!

2 Antworten

Vom Fragesteller als hilfreich ausgezeichnet

Oubyi, UserMod Light

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Microsoft Excel

14.12.2011, 17:21

Userforms sind zwar nicht mein "Fachgebiet", aber ich denke Du siehst es jetzt ganz richtig: Ein Beschriftungsfeld (Label1) hat keine Text-Eigenschaft, sondern nur .caption (Überschrift).
Es ist eigentlich auch nur für diese Funktion, nämlich Überschrift/ Beschriftung gedacht.
Die Textbox ist wesentlich "ereignisreicher". Da gibt es keine Überschrift, sondern eben .text.
Wenn Du eine UF mit Label und Texbox hast, dann schau Dir doch mal im VBA-Editor die Eigenschaften der beiden in Ruhe an.
Textbox hat wesentlich mehr Eigenschaften als das "simple" Label, und eben auch andere.

P.S.: Ich sehe gerade Du "sprichst" von .value. Das dürfte bei der Textbox dem .text entsprechen. Teste mal.

Woher ich das weiß:Berufserfahrung – IT-Administrator (i.R.)

Deichkindzz

Fragesteller

14.12.2011, 17:31

Danke für die ausführliche Antwort, ja es stimmt sogar.

Oubyi, UserMod Light

14.12.2011, 18:43

@Deichkindzz

Gern geschehen.
☼

Oubyi, UserMod Light

01.03.2012, 19:25

@Oubyi, UserMod Light

Danke fürs ☆
☼

Deichkindzz

14.12.2011, 17:11

Hab ich das jetzt richtig erfasst das man bei z.b.

lblGrundgebühr.Caption nimmt, also bei lbl caption? und bei textGrundgebühr.Value ... also bei txt value ?

Wichtig ist noch, dass ich nicht ganze Zeit Alt drücken möchte, wenn man es zum Beispiel mit der Accelerator-Eigenschaft machen muss. Antworten bitte ausführlich beschreiben. Danke im voraus.

...zur Frage

Excel VBA: Wie Inhalt einer Zelle in einer Msgbox anzeigen?

Meine ersten Schritte nach 20 Jahren Pause. Ich will etwas tun, wenn eine Zelle den Text "crash" enthält. Welche Eigenschaft der Zelle ist der Text (VBA)?

...zur Frage

"Frame" mit "CheckBox" als Überschrift?

Ich möchte in einem Formular (UserForm) in Excel VBA einen Rahmen (Frame) erstellen, den ich mit einem Auswahlkästchen (CheckBox) in der Überschrift (Caption) als aktiv markieren kann.

Und dieser Link beweist, dass es einen Weg geben muss...

...zur Frage

WorksheetFunction.match liefert kein Ergebnis in Excel VBA?

Hallo zusammen. Ich habe folgendes Problem. In einer Excel-Datei (ThisWorkbook) habe ich die Tage vom 1.-letzten Tag eines Monats in Reihe 4 stehen. Ein Datum pro Spalte, beginnend in Spalte B. Darunter sollen jeweils Werte aus einer anderen Excel Datei (wbk360) eingetragen werden - mit Hilfe von VBA. In dieser zweiten Datei stehen die Tage untereinander in Spalte A. Ich benutze Worksheetfunction.Match, um die richtige Zeile in der zweiten Datei zu finden, bevor ich von dort Zahlen in meine erste Datei übertragen lasse.

Das hier ist der Teil des VBA Codes, der nicht funktioniert:

    For idatecol = 2 To 21
    On Error Resume Next
    idaterow = WorksheetFunction.Match(ThisWorkbook.ActiveSheet.Cells(4, idatecol).Value, wbk360.ActiveSheet.Range("A:A"), 0)
    
    ThisWorkbook.ActiveSheet.Cells(5, idatecol).Value = wbk360.ActiveSheet.Cells(idaterow, iOccHeader).Value
    ThisWorkbook.ActiveSheet.Cells(6, idatecol).Value = wbk360.ActiveSheet.Cells(idaterow, iIndexHeader).Value
Next idatecol

idaterow sollte mir die Zeile in Datei 2 nennen, in der das Datum steht, das ich gerade in Datei 1 bearbeiten möchte. Wenn ich aber mit F8 Zeile für Zeile durch den Code gehe, bleibt der Wert für idaterow immer 0; es wird also kein Match gefunden.

Die Daten in Datei 2 Spalte A werden als Datum in Excel erkannt. Gebe ich eine Match-Formel direkt auf meinem Worksheet in Datei 1 ein, benutze dort den Datumswert aus Zelle B4 in Datei 1 und suche nach einem Match in Spalte A in Datei 2, bekomme ich 5 als Ergebnis, weil dieses Datum in Zelle A5 in Datei 2 steht.

Offensichtlich findet Excel also das entsprechende Match für jedes einzelne Datum in Datei 1. Mit VBA finde ich aber kein einziges Match.

Hat jemand eine Idee, warum das so ist??? Vielen Dank im Voraus. Rene

...zur Frage

Was bedeutet der Punkt in dem Befehl cells(2,3).Value="Hallo " (Commandbutton Excel)?

Hallo, ich hab hier den Beispielbefehl cells(2,3). Value="Hallo". Wozu dient der Punkt? Was ist in diesem Befehl das Objekt, die Eigenschaft (Attribut), das Event (Ereignis) und die Methode?

...zur Frage

Wie kann ich die Farbe einer Excel Zelle per Knopfdruck und VBA ändern?

Moin, ich hab mal wieder ne Frage zu Excel VBA. Wir haben heute die Aufgabe bekommen in Excel VBA mithilfe einer Sub- Prozedur Farben von Zellen zu ändern.
Es gibt ein Feld "Farb- Nr.", in dem eine Zahl steht, die dann im Sub genutzt wird um eine Farbe zu machen. (s. Screenshot). Bei Druck des Buttons sollen sich die 3 Farbstreifen ändern. Ich habe den Sub bereits dem Button zugewiesen, jedoch kommt beim klicken die Fehlermeldung "Laufzeitfehler 438: Objekt unterstützt diese Eigenschaft oder Methode nicht". Ich wäre demjenigen, der mir helfen kann sehr verbunden. Falls noch etwas unklar sein sollte, fragt bitte einfach nach.

PS: Das ist mein bisheriger VBA Code:

Und so sieht das ganze Tabellenblatt aus:

...zur Frage

VBA: Variablenwert aus Textbox in Zahl ausgeben?

Moin,

Ich möchte aus einer UserForm (Textbox) einen wert (numerisch) als Zahlenwert in eine Zelle ausgeben.

Mein Problem besteht darin, dass Excel den wert als Text erkennt...

Public gewicht As Single
'----
ActiveSheet.Cells(7 , 6).Value = gewicht

Hat jemand eine Idee, wie ich da eine Zahl, mit der ich in Excel selber rechnen kann, draus macht

...zur Frage

Excel VBA - Wert auslesen?

Mein Problem:

Mit dem ersten Makro wird ein Wert in Zelle A1 geschrieben.

In einem weiteren Makro will ich nun diesen Wert auslesen mit Worksheets("Blatt1").Cells(1, 1).Value = i. Wenn ich das mache steht danach in Zelle A1 aber eine 0 und nicht mehr der vorige Wert. Was ist falsch?

...zur Frage

EXCEL VBA Wert als Datum anzeigen?

Hallo zsm

ich habe eine bedingte Formatierung welche ein Datum erkennt.

Das Datum wird aber nicht als Datum anerkannt, welches durch VBA hinzugefügt wird.

Ich habe es in einer anderen Variante drinnen, da funktioniert es. Wiederum lässt sich eine andere Variante bei diesem Vermerk nicht vornehmen.

Hat jmd eine Idee?

Worksheets("Datensatz").Range(idAdr).Offset(, -16) = Worksheets("SuchDaten").Range("A2").Value 'Das muss als Datum geschrieben werden

...zur Frage

VBA Codetext für Prozent rechnen?

Hab mal wieder eine Frage zu EXCEL VBA Code. Ich möchte vom Wert in Spalte "C" aus Spalte "D" (Prozentangabe) errechnen und in Spalte "E" als Ergebnis haben.

Kann mir in dem Fall jemand mit einem Code weiter helfen, meiner bringt ein falsches Ergebnis. Gruß

Mein Code-Versuch:

   Sheets("Tabelle1").Range("E6").Value = ActiveSheet.Range("C6").Value * 66

...zur Frage

Excel VBA: Zu ausgeblendeten Tabellenblättern springen?

Hallo Community,

ich habe ein kleines VBA-Problem in Excel.

Zur Situation: Ich habe eine Mappe mit mehreren Tabellenblättern. Diese Blätter werden mir in einem Dropdownmenü angezeigt. Mithilfe eines Commandbutton springe ich dann auf das zuvor im Dropdown gewählte Tabellenblatt:

Hier der Code vom Commandbutton:

Private Sub CommandButton1_Click()

    ThisWorkbook.Sheets(Range("D7").Value).Select

End Sub

Dieses Code funktioniert allerdings nur, solange ich die Blätter auch unten in der Mappe anzeige.

Nun zu meiner Frage: Wie müsste der Code aussehen, wenn ich die Tabellenblätter ausblende?

...zur Frage

Excel Funktion mit Pythagoras erstellen?

Hallo

Ich möchte gerne im Excel mithilfe von VBA ein Pythagoras-Funktion erstellen.

Function phytagoras(Zahl1, Zahl2)
     pythagoras = (Zahl1 ^ 2 + Zahl2 ^ 2) ^ 0.5
End Function

Kann mir jemand sagen was ich falsch gemacht habe? Denn wenn ich die Funktion im Excel benutze, bekomme ich den Wert 0

...zur Frage

Wie kann man bei einem diagramm in Excel die horozontale und diagonale Achse tauschen? wie kann man Diagramme skallieren? wann benutze ich bei Excel ; und :?

...zur Frage

Sind das die richtigen Befehle um Textfelder in Excel zu programmieren?

1. entwicklertools einfügen

2. visual basic öffnen

3. einfügen -> Userform

4. Rahmen einfügen-> Name auf „Caption“ ändern (Darin Kontrollkästen einfügen und beschriften)

5. Nächster Rahmen einfügen-> Name auf „Caption“ ändern

6. Drehfeld einfügen -> Daneben Textfeld einfügen

7. Nächster Rahmen einfügen und beschriften -> Optionsfelder einfügen und beschriften

8. Nächster Rahmen einfügen und beschriften -> Textfeld und nebendran Beschriftungsfeld einfügen

9. 2x Befehlsschaltflächen einfügen (Übernehmen / Abbrechen)

10. Simulieren

11. Userform1 Überschrift ändern -> Caption -> Name eingeben

12. Abbrechen Kästchen programmieren -> Auf Abbrechen klicken -> Unload UserForm1 eingeben

13. Simulieren

14. Excel öffnen -> Textfeld einfügen

15. Einfügen -> Modul -> UserForm1.Show eingeben

16. Zurück in Excel und Makro zuweisen -> Auswählen

17. Zurück in VisualBasic -> Schriftgröße in Textfeldern ändern -> Font auswählen „Fett“ und „Größe“ ändern

18. Drehfeld Programmieren -> Draufklicken -> TextBox1.Value = SpinButton1.Value eingeben.

19. In Excel ausprobieren

20. Übernehmen/Bestätigen Kästchen programmieren ->

If CheckBox1.Value Then

ThisWorkbook.ActiveSheet.Range("Zeile auswählen").Value = "Ja"

Else

ThisWorkbook.ActiveSheet.Range("Zeile auswählen").Value = "Nein"

End If

21. Zweiter Wert übernehmen eine Zeile drunter -> ThisWorkbook.ActiveSheet.Range("C8").Value = TextBox1.Value

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen