| | |
 | Gut zu wissen: Nutzen der aktuellen Hardware im CAD – Grafikperformance Neuigkeiten in SOLIDWORKS 2021 |
|
Autor
|
Thema: Datum der geöffneten Solidworksdatei auslesen (265 mal gelesen)
|
Pete85
Mitglied
   Beiträge: 31
Registriert: 09.05.2016
|
erstellt am: 30. Nov. 2020 16:18  <-- editieren / zitieren -->   Unities abgeben:          
|
Heiko Soehnholz
Ehrenmitglied V.I.P. h.c.
Dipl.-Ing. Maschinenbau
Beiträge: 4424
Registriert: 03.07.2002 SOLIDWORKS seit 2001
CSWS-TSO/MD/TMD
CSWS-C/D/I/MBD/VIS
CSWP-Core/DT/MT/SM/SU/WD
CSWE/CSSP/CSPP/CSWI/SWPUC
SWX Digital Media Award 2018/2019
SWX 2019SP5/2020SP4/2021SP0
Simu, Flow, Plastics, Composer, MBD,
Inspection, PDMP, Visualize,TopsWorks,
DPS Tools, JobBox, MacroSheet, etc.
Passungstabelle von Heinz
WIN10x64 2004 HP ZBook 17 G5
|
erstellt am: 30. Nov. 2020 16:34 <-- editieren / zitieren --> Unities abgeben: Nur für Pete85 
|
Pete85
Mitglied
Beiträge: 31
Registriert: 09.05.2016
|
erstellt am: 30. Nov. 2020 17:47 <-- editieren / zitieren --> Unities abgeben:
|
ad_man
Mitglied
freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))
Beiträge: 1221
Registriert: 20.12.2003 SolidWorks 2020 SP5 mit Enterprise PDM , Windows 10 x64, HP ZBook 17 G4, i7-7820HQ, 32 GB DDR-Ram, Quadro P-3000
|
erstellt am: 30. Nov. 2020 18:21 <-- editieren / zitieren --> Unities abgeben: Nur für Pete85
Hallo Peter, mit einem Makro geht es mit der SummaryInfo-Eigenschaft: Code:
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2Sub main() Dim strDatum As String
Dim strDateipfad As String 'Solidworks anbinden
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc 'Dateipfad ermitteln
strDateipfad = swModel.GetPathName 'Speicherdatum ermitteln
strDatum = swModel.SummaryInfo(swSumInfoSaveDate2) 'Testausgabe
Debug.Print strDatum
End Sub
------------------
==========
Gruß
Andreas
========== Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HenryV
Mitglied
Konstrukteur, Engineering
Beiträge: 715
Registriert: 18.05.2005 SolidWorks 2020 x64 SP3.0
Dell Precision 5820
Intel Xeon W-2125 4x4GHz
NVIDIA Quadro P2000 5GB
32GB RAM
2x Dell U2412M, 24" TFT
Windows 10 Enterprise x64 1703
Microsoft Office 365 ProPlus
Microsoft Visual Studio Enterprise 2019
|
erstellt am: 01. Dez. 2020 11:45 <-- editieren / zitieren --> Unities abgeben: Nur für Pete85
|
Foren auf CAD.de (alle Foren)
| 
