pb nom d'onglet

[ducat 996 2001]

bonjour

j'aimerai dans un code VBA me servir des noms des feuilles sous la forme feuil1, feuil2....(nom des feuilles sous VBA et nom pas nom des onglets sous excel)

j'ai un code de ce type qui fonctionne parfaitement

ActiveSheet.Cells(16, 3) = Feuil24.Cells(80, 1)

mais j'aimerai l'avoir sous la forme

c=c+1
ActiveSheet.Cells(16, 3) = Feuil & (c).Cells(80, 1)

mais la ça ne fonctionne pas

quelqu'un à une idée ?

merci

 

[papapaul]

Re : pb nom d'onglet

Tu peux essayer ca, ca doit pas etre loin de ce que tu veux

Sub Macro1()

Dim ws As Worksheet

For Each ws In Worksheets 'boucle sur tous les onglets du classeur

Worksheets(ws.Name).Cells(80, 1) = ActiveSheet.Cells(16, 3)

Next ws

End Sub

 

[ducat 996 2001]

Re : pb nom d'onglet

j'ai pas encore testé, mais à premiére vue ça ne devrai pas remédier à mon probléme car je voudrai faire une boucle uniquement sur certains onglets qui ,dans excel ont des noms trés différents, d'où l'utilité de travailler avec les noms des feuilles en VB

merci

 

[papapaul]

Re : pb nom d'onglet

Dans ce cas tu cherches à travailler
avec une listbox ?
Soit plus précis.

 

[ducat 996 2001]

Re : pb nom d'onglet

c'est bon je pense avoir trouvé en me servant d'une partie du code

merci pour l'aide