| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| Optimieren Sie Ihre SOLIDWORKS Tasks mit Visiativ myCADtools - Jetzt Kostenlos testen >>, eine Pressemitteilung
|
Autor
|
Thema: Prozessbalken anzeigen lassen (658 / mal gelesen)
|
Pete85 Mitglied
Beiträge: 156 Registriert: 09.05.2016
|
erstellt am: 31. Mai. 2021 15:21 <-- editieren / zitieren --> Unities abgeben:
Hall zusammen, ist es möglich in einem Makro einen Prozessbalken auszuführen ich möchte das in diesem Programm unterbringen [URL=https://ww3.cad.de/foren/ubb/Forum2/HTML/033469.shtml][/URL] gibt es da einen Baustein. in meinem Fall Zähle ich erst alle Komponenten und lasse dann einen zweiten Zähler im Prozess bis beide Variablen den gleichen Wert haben hoch zählen. geht das denn? Danke und Gruß Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten1210 Mitglied staatl. geprüfter Holztechniker
Beiträge: 1358 Registriert: 24.07.2002 AutoCAD ACA 2019 Solidworks 2021 Sp5.1 Enterprise PDM 2021 Sp5 Pascam Woodworks Visual Studio 2017 Pro Windows 10 64Bit Dell T3620 Intel Core i7-7700K 16 GB Arbeitsspeicher 2x Dell Ultrasharp U2415 Dell M4800
|
erstellt am: 31. Mai. 2021 15:34 <-- editieren / zitieren --> Unities abgeben: Nur für Pete85
|
Christian_W Ehrenmitglied V.I.P. h.c. Konstrukteur (Dipl-Ing)
Beiträge: 3256 Registriert: 04.04.2001 CSWP 12/2015<P>SWX2021sp5 Win10/11 (SWX2016, SWX2012) proAlpha6.2e00/calinkV9 (Tactonworks) (Medusa7, NesCAD2010, solidEdge19)
|
erstellt am: 31. Mai. 2021 20:12 <-- editieren / zitieren --> Unities abgeben: Nur für Pete85
Na super, und ich hab mir den vor kurzem noch mit 2 übereinanderliegenden Buttons generiert, von denen 1 in der Breite verändert wird. Eigentlich nicht besonders kompliziert und geht dann auch in excel ... im eigenen Userform halt. aber für SWX merk ich mir das jetzt auch Gruß, Christian
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Pete85 Mitglied
Beiträge: 156 Registriert: 09.05.2016
|
erstellt am: 14. Jun. 2021 12:07 <-- editieren / zitieren --> Unities abgeben:
|
Pete85 Mitglied
Beiträge: 156 Registriert: 09.05.2016
|
erstellt am: 16. Jun. 2021 07:41 <-- editieren / zitieren --> Unities abgeben:
ich hab mal noch den weiteren Ansatz von Christian_W verfolgt. fündig bin ich unter [URL=https://www.wallstreetmojo.com/vba-progress-bar/][/URL] geworden. den Code habe ich mir angepasst und läuft super Code:
main()
UFProgressBar.Show
ProgressBar_Chart ges 'ges= Anzahl max -> 100% Unload UFProgressBar End Sub Function ProgressBar_Chart(gesamt As Integer, comp As String) ' userform Process bar
Dim ink As Double Dim CurrentUFProgressBar As Double Dim UFProgressBarPercentage As Double Dim BarWidth As Long ink = 250 / ges CurrentUFProgressBar = i * ink 'BarWidth = UFProgressBar.MainProgressLabel.Width * CurrentUFProgressBar UFProgressBarPercentage = Round((CurrentUFProgressBar * 100) / 250, 0) UFProgressBar.MainProgressLabel.Width = UFProgressBarPercentage UFProgressBar.MainProgressLabel.Width = CurrentUFProgressBar
UFProgressBar.ProgessLabel.Caption = UFProgressBarPercentage & "% Complete" DoEvents End Function
Gruß Pete Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |