compteur

Tibo

XLDnaute Barbatruc

• 28 Août 2006

• #2

Re : compteur

resalut Hicham,

A essayer :

=INDIRECT("Feuil1!$I$"&A1)

Si A1 contient 3, va retourner la valeur de 'Feuil1!$I$3

@+

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 28 Août 2006

• #3

Re : compteur

Bonjour Hicham,

tu mets cette ligne où, dans du vba, dans une cellule

joint nous ton code un peu plus complet ...

 

Vote positif 0 Vote négatif

H

hicham8338

Guest

• 28 Août 2006

• #4

Re : compteur

bonjour mutzik, je met ça dans vba:
voici un bout du code en question:

For xa = 2 To Int(Cells(5, 5).Value / 1024)
Worksheets("Report Results").Activate
ActiveSheet.Unprotect ("osoft")
Cells(25, 3) = "='Technical 1'!$I$" & xa
Application.Run ("MNU_ETOOLS_EXPANDANDREFRESH")
Application.Run ("copier_tableau")
next
mais le pbm est que lorsque je l'ecrit comme ça ça ne marche pas

encore merci de vos réponses

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 28 Août 2006

• #5

Re : compteur

Re Hicham, salut Tibo,

1. c'est quoi le msg d'erreur
2. MNU_ETOOLS ..., c'est une sub
3. idem pour copier_tableau

poour lancer une sub à partir d'une autre sub, juste besoin d'écrire le nom de la sub dans le code, soit
MNU_ETOOLS... VBA reconnait que c'est une sub et la lance

 

Vote positif 0 Vote négatif

H

hicham8338

Guest

• 28 Août 2006

• #6

Re : compteur

en fait le pbm n'est pas lié aux applications mais au compteur qui ne marche pas, il ne reconnait pas cette façon d'ecrire le compteur:

Cells(25, 3) = "='Technical 1'!$I$" & compteur
c'est ce qui me pose pbm,

merci

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 28 Août 2006

• #7

Re : compteur

Re,

essaie cells(...).formula

vérifie la syntaxe dans l'aide (pas trop le temps...)

 

Vote positif 0 Vote négatif