Pb d'increment de cellule excel

Olivier78 · 10 Juin 2005

Bonjour

j'ai besoin d'incrementer mes cellules excel afin de positionner le curseur la ou il faut

Ma macro actuelle donne ca :

If Range('H' & j) <> 0 Then
If Range('J' & j) = '' Then
Windows('resultats.xls').Activate
Sheets('Resultats1').Select
Range('A' & i + 1).Select
' va recuperer le numero d'identifiant pour l'afficher dans la feuille resultats
ActiveCell.FormulaR1C1 = '=[' + Ident + '.xls]Feuil1!R4C6'
Range('B' & i + 1).Select
' va récuperer la valeur posant problemes et la met dans la feuille resultat
ActiveCell.FormulaR1C1 = '=[' + Ident + '.xls]Feuil8!R5C8'
End If
End If

j'aimerais remplacer le 'Feuil8!R5C8' en changeant le 5 par le compteur j. du genre 'Feuil8!R[j]C8' mais ca ne fonctionne pas et je ne trouve pas la syntaxe.

Merci de vos reponses

Olivier78 · 10 Juin 2005

personne ne voit comment faire ?

2passage · 10 Juin 2005

Bonjour,

A priori, ca doit donner un truc du genre :

'Feuil8!R' & j & 'C8'

A+

(Edit : mais si ça ne marche pas, pose un fichier exemple, ca ira mieux)

Message édité par: 2passage, à: 10/06/2005 14:59

Robert · 10 Juin 2005

Bonjour Olivier, le forum,

Non testé donc aucune certitude, essai comme ça :

'Feuil8!R' & j & 'C8'

Édition

Oops ! Pas frais... Salut 2passage (Même combat !)

Message édité par: Robert, à: 10/06/2005 15:01

Pb d'increment de cellule excel

Olivier78

Guest

Olivier78

Guest

2passage

XLDnaute Impliqué

Robert

XLDnaute Barbatruc

Discussions similaires

Pb d'increment de cellule excel

Olivier78

Guest

Olivier78

Guest

2passage

XLDnaute Impliqué

Robert

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency