Le format d'import des comptes utilisateurs n'est pas directement compatible avec le format Excel.
Nous mettons à votre disposition le code VBA suivant vous permettant de créer un fichier au format ACT (ACcounTs) depuis votre fichier Excel.
Une fois créé, vous pourrez utiliser celui-ci dans IDEAL Administration via le menu "Mode avancé" / "Ajouter/Modifier des comptes utilisateurs".
Code :
Sub QuoteCommaExport()
' Dimension all variables. Dim DestFile As String Dim FileNum As Integer Dim ColumnCount As Integer Dim RowCount As Integer
' Prompt user for destination file name. DestFile = InputBox("Enter the destination filename" _ & Chr(10) & "(with complete path):", "Simple Excel To IDEAL Administration Exporter")
' Obtain next free file handle number. FileNum = FreeFile()
' Turn error checking off. On Error Resume Next
' Attempt to open destination file for output. Open DestFile For Output As #FileNum
' If an error occurs report it and end. If Err <> 0 Then MsgBox "Cannot open filename " & DestFile End End If
' Turn error checking on. On Error GoTo 0
' Loop for each row in selection. For RowCount = 1 To Selection.Rows.Count
' Loop for each column in selection. For ColumnCount = 1 To Selection.Columns.Count
If (ColumnCount = 1) Then Print #FileNum, "" & Selection.Cells(RowCount, ColumnCount).Text End If If (ColumnCount = 2) Then Print #FileNum, "" & Selection.Cells(RowCount, ColumnCount).Text End If If ColumnCount = Selection.Columns.Count Then Print #FileNum, "" Print #FileNum, End If
' Start next iteration of ColumnCount loop. Next ColumnCount
' Start next iteration of RowCount loop. Next RowCount
' Close destination file. Close #FileNum
End Sub
Comment utiliser ce script?
Tout d'abord, celui-ci suppose que votre fichier Excel est formaté comme suit:
A B User1 Pass1 User2 Pass2 User3 Pass3 Sélectionnez toutes vos données dans la feuille Excel puis menu "Outils" / "Macros" / "Visual Basic Editor" (ou plus simplement ALT+F11).
Dans l'éditeur Visual Basic, menu "Insertion" puis "Module". Effectuez un copier/coller du script ci-dessus. Sélectionnez alors le menu "Exécution" / "Exécuter" puis entrez le nom du fichier en sortie (par exemple, D:\Travail\Mes_comptes.act) lorsque la fenêtre de saisie apparaît. Bien entendu, vous pouvez ajouter d'autres zones comme les groupes, la description du compte, etc... Il vous suffit d'ajouter des colonnes dans votre fichier Excel et de modifier le code ci-dessus en conséquence.
|