Création d'une action en VBA Excel - Besoin d'aide

Création d'une action en VBA Excel - Besoin d'aide - Win NT/2K/XP - Windows & Software

Marsh Posté le 29-01-2013 à 14:53:59    

Bonjour le forum,
 
Après plusieurs jours de recherche, je me permet de me tourner vers vous.
Je suis en train de réaliser une macro et je dois avouer que je galère un peu (je ne suis pas très douée).
 
J'ai importé des comptes et ceux-ci sont rangés en cellule A.
Cette cellule A peut être variable selon les mois (un compte peut exister ou pas).
J'ai réussi à faire une action VBA Excel dans la cellule H4 de mon tableau qui me détermine combien il y a de lignes dans ma colonne A.
 
Maintenant, j'aimerai faire une boucle qui répète cette action sur le nombre de lignes.
L'action que je veux faire marche mais il faudrait que je saisisse à la main le nombre de lignes de la colonne A jusqu'à ce qu'il n'y est plus rien.
Ma formule est la suivante :
 
Ex : A1 = 601120 (n° de compte)
Range("A1" ) = Left([A1],3)
 
Résultat = 601
 
Comment faire pour intégrer à cette fonction le nombre de ligne obtenues en H4?
 
Désolée si je ne suis pas très claire...

Reply

Marsh Posté le 29-01-2013 à 14:53:59   

Reply

Marsh Posté le 01-02-2013 à 15:21:42    

Salut,
 
En php nous avons while et for qui nous permettent de faire une boucle. Regarde sur google "Equivalant While et for pour VBA" ca devrait d'aider un peu.
 
Bon courage :)

Reply

Marsh Posté le 17-02-2013 à 10:45:33    

tu crois que poser une question sur un programme  dans un topic d'un autre programme,  
 
que tu risques d'avoir des réponses ?
 
C'est un peu lorsque tu es en panne de voiture et que prendre rendez vous pour réparer chez ton coiffeur.
 
 
J'ai rien compris...
inutile de faire une macro pour cela
 
tu tapes une formule tout simplement   =GAUCHE(A1;3)
tu cliques une fois sur la cellule B1, à l'angle bas-droite la souris va être représentée par une croix,  tu cliques  2 fois et ta formule est répétée jusqu'à la fin.
 
Si tu veux vraiment une macro,  tu fais la même chose sous l'enregistreur de macro

Reply

Marsh Posté le 17-02-2013 à 16:51:29    

Bonjour
 
Pour excel il y a plusieurs facon de faire des boucles. For ... Next fonctionnera puisque vous avez determine au prealable le nombre de ligne.
 
Vous pouvez vous passer cette etape avec les boucles do...while ou do...until
 
Je vous suggere un site avec un forum assez actif sur ce theme : http://www.excel-downloads.com/
 
Il y a des tutos et des exemples telechargeables qui permettent de progresser.
 
En outre quand on est vraiment coince (cad apres avoir cherche sur le forum un minimum) on pose la question et en general on a une reponse tres pertinente rapidement

Reply

Marsh Posté le 17-02-2013 à 20:31:37    

Code :
  1. Sub ClasseCompte()
  2.     ActiveCell.FormulaR1C1 = "=LEFT(RC[-1],3)"
  3.     Range("B1" ).Select
  4.     Selection.AutoFill Destination:=Range("B1:B" & [A65536].End(xlUp).Row)


 
End Sub


Message édité par chrissud le 17-02-2013 à 20:38:58
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed