Comment écrire des données de tableau Visual Basic dans un fichier texte dans Excel

Instructions

1. Démarrez Microsoft Office Excel et le type "1" dans "A1." Type "2" dans "A2," "3" dans "A3" et "4" dans "A4."

2. Sélectionnez le "Développeur" onglet et faites un clic "Visual Basic." clic-droit "Objets Microsoft Excel" et sélectionnez "Insertion," puis cliquez sur "Module."

   Type "Private Sub saveDataArray ()" pour créer un sous-programme et appuyez sur "Entrez."

3. Tapez la commande suivante pour déclarer vos variables:

   Dim txtFileNum As Integer

   Dim dataArray (5) As String

   Dim xLoop As Integer

4. 
   
   
   

   Tapez la commande suivante pour créer un nouveau fichier texte:

   Ouvert "C: MyTextFile.txt" Pour Append Comme #txtFileNum

   Remplacer "C: MyTextFile.txt" avec le nom de fichier de votre choix.

5. Tapez la commande suivante pour parcourir les données dans Excel et l'enregistrer sur votre tableau:

   
   
   
   
   

   Pour xLoop = 1 à 4

   Gamme("UN" &Amp xLoop) .Select
   dataArray (xLoop) = Range ("UN" &Amp xLoop) .Value

   Suivant xLoop

6. Tapez la commande suivante pour parcourir le tableau et enregistrer les données dans votre fichier texte:

   Pour xLoop = 1 à 4

   Imprimer #txtFileNum, dataArray (xLoop)

   Suivant xLoop

7. Tapez la commande suivante pour fermer le fichier texte:

   Fermer #txtFileNum

   Appuyez "F5" pour faire fonctionner votre routine.