Incrémentation spécifique dun chiffre dans une formule

T

THE CAT 2007

Guest

• 5 Octobre 2007

• #2

Re : Incrémentation spécifique dun chiffre dans une formule

Bj,

il y a 65536 feuilles dans le classeur ou je comprends mal la formule ?

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 5 Octobre 2007

• #3

Re : Incrémentation spécifique dun chiffre dans une formule

Bonsoir le fil,

Optimiste THE CAT 2007, 65536 feuilles, va me falloir un PC comme ça... hihi...

Arnaud61, peux-tu mettre un fichier exemple, quelques dix ou vingt lignes représentant ton souci et la réponse attendue...... (ZIPPE) le fichier, dans Gérer les pièces jointes...

A te lire.

Jean-Pierre

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 5 Octobre 2007

• #4

Re : Incrémentation spécifique dun chiffre dans une formule

bonsoir Arnaud
Salut The Cat
Salut jeanpierre (toujours un plaisir de te croiser)

A tester

Code:

Sub test()
formule = CStr(Range("B2").FormulaLocal)
For n = 3 To 65000
  Range("B" & n).FormulaLocal = Replace(formule, "1", CStr(n))
Next n
End Sub

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 5 Octobre 2007

• #5

Re : Incrémentation spécifique dun chiffre dans une formule

Et PierreJean est arrivé, sans se presser....(air connu)

Va être dur le week-end, je sens cela...

 

Vote positif 0 Vote négatif

A

Arnaud61

XLDnaute Occasionnel

• 5 Octobre 2007

• #6

Re : Incrémentation spécifique dun chiffre dans une formule

J'ai un peu adapté le code de pierre jean ça fonctionne! Merci beaucoup!

Problème résolu

 

Vote positif 0 Vote négatif

T

THE CAT 2007

Guest

• 9 Octobre 2007

• #7

Re : Incrémentation spécifique dun chiffre dans une formule

bj à tous,

ai confondu la syntaxe 'Tâche N°1'!B3 avec celle de feuil1!B3
d'où mon renvoi sur 65000 feuilles :-(

comme quoi à fréquenter les forums, on s'endort moins bête .... ;-)

 

Vote positif 0 Vote négatif

A

Arnaud61

XLDnaute Occasionnel

• 20 Novembre 2007

• #8

Re : Incrémentation spécifique dun chiffre dans une formule

Bonjour,

Je me permet de reprendre ce fil.

J'ai aujourd'hui besoin d'évoluer d'une étape concernant ma formule:

=SI(DD6=1;"4. Fait";SI(ESTTEXTE('Tâche N°1'!B5);'Tâche N°1'!B5;""))

Après l'exécution de ma macro j'aimerais avoir:

=SI(DD7=1;"4. Fait";SI(ESTTEXTE('Tâche N°2'!B5);'Tâche N°2!B5;""))

Pour passer de 'Tâche N°1' à 'Tâche N°2' j'utilise ce code:

Code:

formule = CStr(Worksheets("Travaux Arnaud - Récap").Range("DG1").FormulaLocal)
Worksheets("Travaux Arnaud - Récap").Range("C" & p + 2).FormulaLocal = Replace(formule, "1", CStr(y))

Ca me remplace tous les "1" par ma variable "y"

J'aimerais pouvoir garder mon premier "1" à "1"

Avez-vous une idée?

Merci

 

Vote positif 0 Vote négatif

A

Arnaud61

XLDnaute Occasionnel

• 20 Novembre 2007

• #9

Re : Incrémentation spécifique dun chiffre dans une formule

Résolu!

J'ai enchainé plusieurs fois le code en l'adaptant!

 

Vote positif 0 Vote négatif