Discussion :

[guismoman33]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
While Not IsEmpty(Workbooks(1).Sheets(13).Cells(p, 1))
      p = p + 1
    Wend

Voila ma boucle
Une erreur s'inscrit lorsque j'éexecute ce script. Sa me marque : l'erreur définie par l'application ou l'objet.Ceci peut provenir de quoi??

[guismoman33]

Voila j'ai régler mon porblème mais un autre ce met dessus. Comment peut-on mettrre dans une case le nom de la feuille.
Voila se que j'ai fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Workbooks(1).Sheets(13).Cells(1, 1).Value = Worksheet.Name

[ouskel'n'or]

Tu veux mettre le nom de quelle feuille ?
Là, ton code ne sait pas de quoi il s'agit...

[guismoman33]

J'ai un bouton sur la sheet1, quand je clique dessus je veux qu'il m'inscrive dans la case A1 de la feuille 13, le nom ou le numero de la feuille qui est sheet1 ou compteur(c'est le nom de la feuille).

[ouskel'n'or]

J'y comprends rien mais tu peux toujours essayer avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Workbooks(1).Sheets(13).Cells(1, 1).Value = ActiveSheet.name

Mais comme tu as ton bouton actif (puisque tu cliques dessus), je ne sais pas s'il va reconnaître la feuille active
A tester
A+

[guismoman33]

et il existe une formule qui dit est que la chaine de lettre "maison " ce trouve dans la colonne A??

[ouskel'n'or]

Quel rapport avec ta question précédente ?

[guismoman33]

C'est le même programme et je pense que cela ne sert a rien de faire un nouveau topic pour cette question...

[guismoman33]

et une dernière question au passage, comment on fait pour savoir combien de ligne active il y a dans la feuille???????

[ouskel'n'or]

Vaste problème ! Regarde là, tu as (presque) toutes les réponses que tu peux désirer
A+