Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  SolidWorks
  VBA Konfiguartionstabelle hinzufügen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS
  
Dassault Systèmes auf der Hannover Messe 2024 (kostenlose Tickets verfügbar)
Autor Thema:  VBA Konfiguartionstabelle hinzufügen (718 mal gelesen)
Bernhard09
Mitglied
Konstrukteur Rohrbündelwärmetauscher


Sehen Sie sich das Profil von Bernhard09 an!   Senden Sie eine Private Message an Bernhard09  Schreiben Sie einen Gästebucheintrag für Bernhard09

Beiträge: 80
Registriert: 09.04.2013

Intel i7-8850 @2,6GHz
32GB Ram
Nvidia Quadro P1000
Windows 10 Enterprise 1809
Inventor Professional 2016 SP26
Vault Basic 2016
SoliWorks 2019
Pro.File 8.7

erstellt am: 04. Nov. 2020 09:01    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo liebe Gemeinde.
Ich starte gerade erst in der Programmierung von Solidworks.
Mein anliegen ist es einem Bauteil eine Konfigurationstabelle aus einer bestehenden Exceltabelle zuzuordnen.
Das klapp bis jetzt auch gut nur die Tabelle erscheint im Solidworksfenster wird aber nicht geschlossen. Der Befehl "Detach" klappt nicht und ich weiß nicht warum.
Das ganze soll später aus einer Baugruppe heraus ausgeführt werden um in allen Bauteilen der Baugruppe eine Tabelle einzufügen.
Aber erst mal Schritt für Schritt.
Vielen Dank für eure Hilfe.
Code:

Option Explicit
Sub main()

    Dim swApp                  As SldWorks.SldWorks
    Dim swModel                As SldWorks.ModelDoc2
    Dim swDesTable              As SldWorks.DesignTable
    Dim value                  As Boolean
   
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
       
    value = swModel.InsertFamilyTableOpen("C:\ProFile_WC\test\TabellevonTeil1.xlsx")
   
    swDesTable.Detach
       
End Sub


------------------
Personalführung ist die Kunst, den Mitarbeiter so schnell über den Tisch zu ziehen das er die Reibungshitze als Nestwärme empfindet.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

ad_man
Mitglied
freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))


Sehen Sie sich das Profil von ad_man an!   Senden Sie eine Private Message an ad_man  Schreiben Sie einen Gästebucheintrag für ad_man

Beiträge: 1366
Registriert: 20.12.2003

erstellt am: 04. Nov. 2020 11:13    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Bernhard09 10 Unities + Antwort hilfreich

Moin Bernhard,

ich würde die Tabelle erst einmal schließen mit dem Befehl

http://help.solidworks.com/2020/english/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.IModelDoc2~CloseFamilyTable.html

Vielleicht hilft das weiter 

------------------
==========
Gruß
Andreas
==========

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Bernhard09
Mitglied
Konstrukteur Rohrbündelwärmetauscher


Sehen Sie sich das Profil von Bernhard09 an!   Senden Sie eine Private Message an Bernhard09  Schreiben Sie einen Gästebucheintrag für Bernhard09

Beiträge: 80
Registriert: 09.04.2013

Intel i7-8850 @2,6GHz
32GB Ram
Nvidia Quadro P1000
Windows 10 Enterprise 1809
Inventor Professional 2016 SP26
Vault Basic 2016
SoliWorks 2019
Pro.File 8.7

erstellt am: 04. Nov. 2020 11:20    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Super das war es schon. Vielen Dank.
Sich in der API Hilfe zurecht zu finden ist nicht so ganz einfach 

------------------
Personalführung ist die Kunst, den Mitarbeiter so schnell über den Tisch zu ziehen das er die Reibungshitze als Nestwärme empfindet.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

ad_man
Mitglied
freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))


Sehen Sie sich das Profil von ad_man an!   Senden Sie eine Private Message an ad_man  Schreiben Sie einen Gästebucheintrag für ad_man

Beiträge: 1366
Registriert: 20.12.2003

erstellt am: 04. Nov. 2020 11:29    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Bernhard09 10 Unities + Antwort hilfreich

Mit der Zeit kommt man hinter die Geheimnisse der API-Hilfe 

------------------
==========
Gruß
Andreas
==========

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2024 CAD.de | Impressum | Datenschutz