Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Checkboxen in Frame automatisch erzeugen
#11
Hallo Uwe
danke für Deinen Code
Hat sehr geholfen

@ALLE
Ich hab mal da was zusammengestellt (erster Wurf) (siehe Anhang)
Verbesserungen , Erweiterungen , Ideen sind Willkommen:0550

Gruß
DeBabba - Klaus


Angehängte Dateien
.xlsm   Framefüllen.xlsm (Größe: 45,71 KB / Downloads: 8)
Antworten Top
#12
Hallo Klaus,

wenn Du die Inhalte der Textboxen an Integer-Variable übergibst, solltest Du auch prüfen, ob Integer-Werte bzw. zumindest numerische Angaben drin stehen. Ansonsten gibt Dir Excel eine Fehlermeldung aus.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#13
Hallo André
vielen Dank für den Tipp
habe das ganze nur mal schnell zusammengeschraubt und werde es (wenn ich mal wieder etwas mehr Zeit habe) erweitern / verbessern.
Ich habe des öffteren mit Forms zu tun, in welchen viele Textfelder / checkboxen usw. eingebaut werden müssen. das ganze "Namen usw. vergeben hat immer ne Menge zeit gekostet und da dachte ich mir.......
Danke nochmals für Deinen Tipp :100:
Gruß
Klaus
Antworten Top
#14
Hallo Klaus,

ich habe die Textboxenüberprüfung eingebaut und das Ganze ein wenig verschlankt.

Gruß Uwe


Angehängte Dateien
.xls   Framefüllen_Uwe.xls (Größe: 64,5 KB / Downloads: 7)
Antworten Top
#15
Hallo Uwe,
vielen Dank für Deine Überarbeitung
Da man machmal z.B. zu einem Textffeld vielleicht auch noch ein Beschreibungsfeld brauch habe ich die Zeile
.Frame1.Controls.Clear
in
If MsgBox("Soll der Frame geleert werden", vbYesNo) = vbYes Then .Frame1.Controls.Clear
geändert

2 Sachen / Fragen hätt ich aber noch
1. Du hast die Zeile " If Spal * Zeil then" Hier wird doch gar nix abgeprüft also nur "Wenn Spal mal Zeil dann". was bringt das / soll das ?
Gibts da nen tieferen Hintergrund ?
2. Bei nem Label gibt es nur Caption , kein Value. Also hab ich die Zeile
.value = Tex

Nochmals Danke für Deine MegaHilfe, denn einiges war mir neu:10017

Gruß
Klaus
in
If strProgID = "Forms.Label.1" then .Caption = Tex else .value = Tex


Angehängte Dateien
.xlsm   Framefüllen_Uwe_Klaus.xlsm (Größe: 33,84 KB / Downloads: 22)
Antworten Top
#16
Hallo Klaus,

" If Spal * Zeil then" prüft, ob sie beide Werte größer null enthalten.
Ausgeschrieben sähe es so aus:
If Spal * Zeil <> 0 then
0 (Null) ist False, alles andere ist True.
Das war noch von den vorherigen InputBox-Abfragen drin,
könnte jetzt also entfallen, da das ja schon vorher geprüft wird.

Gruß Uwe
Antworten Top
#17
Ah so,
heißt also wenn Du gegen 0 prüfst braucht man das nicht komplett auszuschreiben
Ok.-...
wieder was dazugelernt

Gruß
klaus
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste