Parcours lignes feuille excelRésolu

Question

Bonjour,

j'essai de faire un parcours des lignes d'un tableau excel, je ne sais pas comment faire.

De plus pendant ce parcours j'aurai besoin de pouvoir recuperer le numero de la ligne et de pouvoir appeler les cellule Hx par exemple.

Merci de votre aide.

Newbis inside...

cs_ITALIA · Accepted Answer

pour le parcour d'un fichier excel :
Dans Projet...Références coches Microsoft Excel XX Object Library

Public ClasseurXLS As Object ' a mettre tout en haut du Code de ta forme

Private Sub Command1_Click() ' Code du Bouton 

MousePointer = 11

Set ClasseurXLS = CreateObject("Excel.application")
ClasseurXLS.Workbooks.Open "C:\Toto.xls"
For i = 1 To 5000 ' Parcour les 50000 Premiéres ligne
  If ClasseurXLS.Cells(i, "A") = "" Then Exit For ' Sort de la Boucle si la Cellule A - i est vide
  Valeur1=ClasseurXLS.Cells(i, "A") ' Lecture de la Valeur des Cellules A - i
  Valeur2=ClasseurXLS.Cells(i, "B") ' Lecture de la Valeur des Cellules B - i
Next
ClasseurXLS.Workbooks.Close ' Fermeture du Classeur d' Importation
MousePointer = 1

End Sub

It@li@

kick4ever · Answer

Ok merci ça marche parfaitement :D

Une autre question, je travail via excel et pour les macro classique on peu attribuer un raccourcis clavier, mais dans mon cas j'utilise une UserForm et je ne sais pas comment faire :(

Merci d'avance

cs_ITALIA · Answer

coches reponse accepté si ca ta va....je ne comprend pas ta nouveau souci...sois plus clair

It@li@

kick4ever · Answer

Avec les macro excel classique on peu choisir un raccourci clavier aui lancera la macro. Comment faire de meme avec un USERFORM?

Merci

cs_ITALIA · Answer

Avec l'evenement KeyPress

Private Sub Form_KeyPress(KeyAscii As Integer)

If KeyAscii=32 Then ' Si Touche espace
         ' Mon Code
End If

End Sub

It@li@

Parcours lignes feuille excel

5 réponses

Discussions similaires