Salut @Michel94
C’est une dll qui fait un lien avec le WSH qui sert sous windows à lancer des script vbs, tu l’utilise dans ton code à différent endroit exemple settingSheet
=> Set fso = CreateObject(« Scripting.FileSystemObject »)
Sub CommandButton_RemoveIpx
Private Sub CommandButton_RemoveIpx_Click()
Dim response As Integer, fso As New FileSystemObject, folderPath As String, subFolder As String
response = MsgBox(« Remove " & graphSheet.Label_IpxName.Caption & " from IpxBrowser ? », vbYesNo, « Remove Ipx »)
If response = 6 Then
ipxSelectorLockFlag = True
folderPath = ActiveWorkbook.Path & "" & graphSheet.Label_IpxName.Caption
Set fso = CreateObject(« Scripting.FileSystemObject »)
If fso.FolderExists(folderPath) Then
On Error GoTo err:
fso.DeleteFolder folderPath
IpxSelectorUpdate
Else
MsgBox « Ipx folder not find », vbExclamation
End If
ipxSelectorLockFlag = False
End If
Exit Sub
err:
response = MsgBox("Error " & err.Number & vbLf & err.Description, vbOKOnly, « Error »)
ipxSelectorLockFlag = False
End Sub
Je regarde dans mon existant pour te donner des équivalents comme pour sleep ! ![]()
ps:
je t’ai mis ce qu’il faut dans la réponse là. L’avantage c’est que cela permettra de supprimer le code qui pourrait poser problème sur mac.
`