Exécution macro excel Fermé

Question

Bonjour à tous,  

Je suis très novice en vba et Excel en général. Ayant laborieusement réussi à écrire une macro, je suis maintenant en plein désespoir parce que je n'arrive pas à l'exécuter. 
Quand je clique sur la flèche, on me demande d'entrer un nom de macro et ça m'en créer une nouvelle. 
En plus, dans l'onglet "affichage"-->"macro", ma macro n'apparait pas... 

Je dois faire quoi??? 

Merci 



Configuration: Windows XP / Internet Explorer 7.0

ccm81 · Answer

bonjour

peux tu envoyer ton ficher, avec la macro, par cijoint.fr au format excel 2003, et coller le lien obtenu dans ton prochain message, on y verra plus clair

bonne suite

Melycea · Answer

ClasseurA:http://cjoint.com/?AEnp9PjsNVp
ClasseurB:http://cjoint.com/?AEnpleyezm

ccm81 · Answer

re

RQ1. il me semble que la macro remplit LA cellule sélectionnée classeur A feuille 1 colonne D oui/non ? 
si c'est non, peux tu me dire qu'est ce qu'elle est censée faire?

RQ2. cette macro doit être lancée par exemple par un bouton, ce que j'ai fait

http://www.cijoint.fr/cjlink.php?file=cj201105/cijlAG3H8D.xls

RQ3. ça plante sur la ligne 
nCol = ActiveWorkbook.Sheets(2).Cells(Lig, 3)
où nCol est déclarée integer, alors que la cellule en question feuille 2, contient une lettre

RQ4. tu vas faire une exécution pas a pas de la macro pour cela, 
tu mets un point de suivi en marge de la 1° ligne de code de ta macro (clic dans la marge -> gros point marron) , puis tu selectionne D2 (feuille 1) et clic sur OK, 
VBA repasse dans le module de la feuille 1, et est pret à executer
F8 pour executer la ligne et  en passant au dessus des variables (ici TotFeuille1), tu vois ce qui se passe, 
F8 pour exécuter la ligne suivante ....
ça devrait planter sur la ligne nCol

bonne suite

ccm81 · Answer

re

RQ8. en tenant compte des RQS, j'ai exécuté pour D2, mais est-ce le résultat attendu?

RQ9. si c'est oui voir RQ6

http://www.cijoint.fr/cjlink.php?file=cj201105/cijruOmmN5.xls

bonne soirée

Melycea · Answer

Woaw, merci beaucoup pour toutes tes remarques!  
Alors ma macro est censée chercher dans les "tableaux croisés" du classeurB une valeur. Et pour cela j'aurai voulu par exemple pour remplir D2 qu'elle cherche la valeur C2 dans les noms de lignes et la valeur Feuil2!C2 dans les noms de colonnes.  
Dans mon exemple on avait C2=3 et Feuil2!C2=a et donc on aurait du avoir en D2=aaa  

Cette recherche est censée se faire dans toutes les feuilles du ClasseurB, jusqu'à ce qu'on trouve la valeur qui correspond. De plus, j'aimerai qu'elle remplisse toute la colonne au fur à mesure qu'on remplisse le tableau (mais je ne sais pas si c'est possible...)  

Je ne connaissais pas du tout le principe du bouton mais en effet, je pense que c'est une bonne chose.  

Dans While Indice < 2 Or F <= TotFeuil le OR est volontaire puisque c'était pour éviter de chercher dans toutes les feuilles si on a trouvé la valeur ou sinon, ne pas faire de boucle infinie.  
En fait, le "indice" s'incrémente si on a bien trouvé la valeur. Donc en gros, c'est "tant que" la valeur n'est pas trouvée ou qu'on a pas cherché dans toutes les feuilles.  

J'ai pas encore appliquée toutes tes bonnes remarques mais tu auras certainement compris que le résultat dans ton dernier fichier n'est pas celui attendu...  

Je vais donc revoir tout ça en appliquant tes remarques pour voir d'où vient le problème.  

Merci encore pour ton aide.  
Je te tiens au courant de mes avancées.

Melycea · Answer

Bon je pense avoir résolu tous les problèmes.
Tout d'abord, tu avais effectivement raison à propos des "and" dans mes "while". Parce que je voulais éviter les boucles infinies mais finalement je les avais provoquées...
Ensuite, j'avais oublié les "." dans le "with" à chaque fois que j'appelais une cellule, du coup il la cherchait dans le ClasseurA donc forcément, ça ne pouvait pas coller.

Donc pour finaliser, il me faudrait un moyen d'éviter d'avoir à cliquer sur le bouton à chaque ligne.
Est-ce qu'il faut alors que je refasse une boucle où j'intègrerai cette macro (ou du moins la partie avec le premier "while")???

ccm81 · Answer

re

Pour ne pas compliquer inutilement Remplir, le mieux c'est d'agir sur l'appelant (commandButton_1Click), ça nécessiite quelques modifs chez Remplir (les ActiveCell du début et les cells(Lig,4) de la fin) qui va agir sur une cellule (celle envoyée par CommandButton_1Click) et non plus sur la cellule active
Et c'est CommandButton_1Click) qui va envoyer à Remplir les cellules l'une après l'autre

- pour remplir la plage D2:D20 (modifs sur Remplir et CommandBbutton_1Click) 
- n'oublies pas tes modifs persos de ton post 9

http://www.cijoint.fr/cjlink.php?file=cj201105/cijjycW4xi.xls

bonne journée

ccm81 · Answer

re

- désolé pour la RQ de mon post 13, Lig est bien utilisée (quand on ne veut pas voir, on ne voit pas, c'est bien connu)
- c'est au niveau de la colonne A qu'il faut tester le nombre de lignes sinon, tu vas te retrouver avec la plage D1:D2
- en fait on va 
1. declarer plage comme une variable chaine (et non plus comme constante)
Dim plage as string
2. fabriquer' la plage D2Dxx avec plage = "D2:D" & derli
le reste ne bouge pas

Private Sub CommandButton1_Click()
Dim plage As String, derli As Long
Dim c
  derli = Range("A65536").End(xlUp).Row
  plage = "D2:D" & derli
  ' remplir la plage D2:Dxx de la feuille 1 du classeur A
  For Each c In Range(plage)
    Call Remplir(c)
  Next c
End Sub

bonne suite

Melycea · Answer

ok! le petit grain de sable qui enrayait toute la machine ^^

Merci beaucoup

Exécution macro excel

9 réponses

Discussions similaires