Mapselectie onder VBA?

3D Design Volume Model
1

Hallo

Als ik vraag om een map in VBA te selecteren, vind ik het pad helemaal niet intuïtief. Iedereen weet van een opdracht om een Windows Verkenner type venster te openen dat een dubbelklik uitbreiding van mappen mogelijk zou maken?

Ik gebruik het volgende commando:

"Keuze van het dossier
 VlagChoix = &H1
    msg = "Map selecteren:"
    Set objShell = CreateObject("Shell.Application")
     Bij fout Hervatten Volgende
        Set objFolder = objShell.BrowseForFolder(&H0&, Msg, FlagChoix)
         Als NbPoint = 0 dan
         Pad = objFolder.ParentFolder.ParseName(objFolder.Title). Pad & ""
         Anders
         Sub afsluiten
         Einde als

 

Bij voorbaat dank,

1 like
2

Hallo

Ik heb een kleine tutorial gemaakt om Windows Verkenner te openen om een map te kiezen, het is heel praktisch:

http://www.lynkoa.com/tutos/3d/selectionner-un-repertoire-en-vba

Als de tutorial niet werkt, kan ik het bestand hier op de pc zetten, vraag het gewoon.

2 likes
3

Hallo

Ik wil het bestand in PJ, tutorials werken niet voor mij a priori...

Bedankt!

1 like
4

Misschien een bug, want ik heb geen toegang tot je tutorial either@PL

1 like
5

Ja, de tutorials werken niet, het is een bug die aan het personeel is gemeld en helaas is het niet opgelost met de update van 1 oktober...

http://www.lynkoa.com/tutos/3d/selectionner-un-repertoire-en-vba

 

De code die in een macro moet worden opgenomen, is hier:

http://we.tl/C85tB1qRGr

3 likes
6

Dus ik krijg het ook terug, het kan me op een dag altijd van pas komen. Haha

1 like
7

.PL, zou het mogelijk zijn om de tutorial ook te sturen? De code werkt niet voor mij, het kan me helpen begrijpen ...

"FileDialog" wordt niet herkend. Als je een aanwijzing hebt, ben ik geïnteresseerd, zo niet, dan graaf ik een tijdje in.

Een +

 

8

Hallo

Met een beetje onderzoek:

GirlDialog: https://msdn.microsoft.com/fr-fr/library/office/ff836226.aspx

Er zijn tientallen voorbeelden op het web te vinden

1 like
9

Sorry dat mijn vorige code werkt voor Excel, en ik ging ervan uit dat het ook voor SolidWorks zou werken zonder te testen, maar dat doet het niet!

Hier is het juiste bestand:

http://we.tl/CgWO3GxU8T

En de juiste tutorial:

http://www.lynkoa.com/tutos/solidworks/api-solidworks-explorateur-windows-pour-selection-de-fichier-vba-0

 

 

2 likes
10

@remrem: juist de FileDialog is niet compatibel met SolidWorks, maar alleen met Excel!

1 like
11

Ik zet mezelf -1!

;-)

1 like