| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| | |
 | Hoffmann World of Tools 2024 |
|
Autor
|
Thema: Stefans Schriftfeldprogramm (2927 mal gelesen)
|
Andi Beck
Ehrenmitglied V.I.P. h.c.
Konstrukteur
   Beiträge: 2572
Registriert: 02.10.2006 Firma: SW 2023-4.0 + PDM Prof.
Windows 10 Pro 64bit, i9-11900
32 GbRAM, Quadro P2200
Home:
SW 2022-5.0
Passungstabelle von Heinz
Windows 11 Pro 64bit,
i7-12700K, 32 GbRAM,
GeForce GTX 1050Ti
Samsung C34H892, 3440x1440 Pixel
|
erstellt am: 03. Okt. 2006 16:40  <-- editieren / zitieren -->   Unities abgeben:          
Hallo mal wieder, ich bin gerade dabei, Stefans Schriftfeldprg. für uns anzupassen. So langsam check ich´s, habe aber 2 Probleme. Erstens
Die Zeilen im Macro txtSfDescription.Text = Model.CustomInfo2(glbConfName, "Description")
Model.CustomInfo2(glbConfName, "Description") = txtSfDescription.Text
dummy = Model.DeleteCustomInfo2(glbConfName, "Description") tragen den Wert in die Konfigurationsspezifischen Eigenschaften ein.
Wie muss ich schreiben, dass sie in den Benutzerdefinierten Eigenschaften eingetragen werden? Zweitens
Der Buton "aktuelles Datum eintragen" schreibt das Format TT:MM:JJJJ.
Wie kann ich dieses zu TT:MM:JJ ändern? Wir haben leider nicht genug Platz im Schriftkopf, um das volle Format einzutragen. Besten Dank im Vorraus
Andi Beck ------------------
Hast du kein Problem?
Such dir eins. ( Und löse es ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Andreas Müller
Mitglied
Masch. Ing. HTL / Betriebsing. STV
Beiträge: 1151
Registriert: 11.04.2001
|
erstellt am: 03. Okt. 2006 16:48 <-- editieren / zitieren --> Unities abgeben: Nur für Andi Beck 
Hallo Andi Problem Nr. 1 ist folgendermassen zu lösen:
Model.CustomInfo2("", "Description") = txtSfDescription.Text
oder glbConfName = ""
Model.CustomInfo2(glbConfName, "Description") = txtSfDescription.Text Heisst, wenn kein Konfigname angegeben wird, wird eine benutzerdef. Eigenschaft geschrieben. Problem Nr. 2 müsste mit dem VBA-Befehl "Format(....,....)" zu lösen sein. Wie (ganz) genau kann ich Dir auf Anhieb nicht sagen. ------------------
 Gruss
Andreas
A+E Müller AG Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Andi Beck
Ehrenmitglied V.I.P. h.c.
Konstrukteur
Beiträge: 2572
Registriert: 02.10.2006 Firma: SW 2023-4.0 + PDM Prof.
Windows 10 Pro 64bit, i9-11900
32 GbRAM, Quadro P2200
Home:
SW 2022-5.0
Passungstabelle von Heinz
Windows 11 Pro 64bit,
i7-12700K, 32 GbRAM,
GeForce GTX 1050Ti
Samsung C34H892, 3440x1440 Pixel
|
erstellt am: 03. Okt. 2006 17:36 <-- editieren / zitieren --> Unities abgeben:
Hallo Andreas, Der Typ mit den beiden "" war goldrichtig. Unities sind schon vergeben. Besten Dank, auch dafür, dass noch jemand am Feiertag wurschtelt. Jetzt fehlt nur noch Problem 2 Grüße
Andi Beck ------------------
Hast du kein Problem?
Such dir eins. ( Und löse es ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Mc Fly
Mitglied
Masch-bautechniker
Beiträge: 254
Registriert: 03.11.2003 Win7 Prof SP1 X64
Intel Xeon W3670
16GB RAM
SWX 2011 SP5
** CSWP 10/07 **
|
erstellt am: 05. Okt. 2006 09:31 <-- editieren / zitieren --> Unities abgeben: Nur für Andi Beck
Hallo Andi, wir haben das Problem so gelöst =>
txtSfDatum = Format(Date, "dd.mm.yy")
siehe auch das Bild da sieht man wie unser "schreib's" aufgebaut ist Bei Fragen bitte nochmal ins Forum schreiben o. eine Mail schicken.
Gruss Mc Fly Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Piet
Mitglied
Konstruktionsleiter & Konstrukteur
Beiträge: 661
Registriert: 20.11.2001 SWx 2021
|
erstellt am: 05. Okt. 2006 13:20 <-- editieren / zitieren --> Unities abgeben: Nur für Andi Beck
|
Andi Beck
Ehrenmitglied V.I.P. h.c.
Konstrukteur
Beiträge: 2572
Registriert: 02.10.2006 Firma: SW 2023-4.0 + PDM Prof.
Windows 10 Pro 64bit, i9-11900
32 GbRAM, Quadro P2200
Home:
SW 2022-5.0
Passungstabelle von Heinz
Windows 11 Pro 64bit,
i7-12700K, 32 GbRAM,
GeForce GTX 1050Ti
Samsung C34H892, 3440x1440 Pixel
|
erstellt am: 05. Okt. 2006 19:23 <-- editieren / zitieren --> Unities abgeben:
Hallo Mc Fly und Piet, ich habs wie Mc Fly gemacht, da die Zeile ideal in Stefans Prg. passt. Es funktioniert wie gewünscht. Für die Mühen an beide entsprechende Unities. Besten Dank Grüße von Andi Beck ------------------
Hast du kein Problem?
Such dir eins. ( Und löse es ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
