"Clément Marcotte" a écrit dans le message de news:%
Bonjour,
À première vue, c'est du grand art.
"Jacky" a écrit dans le message de news:
Bjr Dans le module de la feuille
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) For i = 4 To 65536 MsgBox Range("b" & i).Value Range("b" & i).Value = Range("b" & i + 1).Value Next MsgBox Chr(67) & Chr(145) & Chr(69) & Chr(83) & Chr(84) & " " & Chr(70) &
Chr(73) & Chr(78) & Chr(73) End Sub
JJ
"JEAN" a écrit dans le message de news:
bonjouur,
Quelqu'un sait comment dire dans une formule:
B4= B5 ¶....................................¶5536
ce qui est dans B4 sera indentique à B5:B65536
merci
JEAN
re au fait j'ai pas besoin du msg box au fait j'ai la formule SOMME prod ( E4&.... et la valeur de E4 est unique et doit etre la meme dans toute la colonne que j'ai quand je fait un copie en deuxiemeligne apparait SOMME prod ( E5&....,SOMME prod troisième( E6&....,SOMME prod quatrieme( E7&....
je veux que E5æçä,c'est pour m'eviter de changer le E5 ou E6 ou E7 à chaque fois pour mettre E4 y'a 65536, donc ca va me prendre vachement de temps
quelqu'un à une méthode?
merci
"Jacky" wrote:
Bjr Dans le module de la feuille
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) For i = 4 To 65536 MsgBox Range("b" & i).Value Range("b" & i).Value = Range("b" & i + 1).Value Next MsgBox Chr(67) & Chr(145) & Chr(69) & Chr(83) & Chr(84) & " " & Chr(70) & Chr(73) & Chr(78) & Chr(73) End Sub
JJ
"JEAN" a écrit dans le message de news:
bonjouur,
Quelqu'un sait comment dire dans une formule:
B4= B5 ¶....................................¶5536
ce qui est dans B4 sera indentique à B5:B65536
merci
re
au fait j'ai pas besoin du msg box
au fait j'ai la formule SOMME prod ( E4&....
et la valeur de E4 est unique et doit etre la meme dans toute la colonne que
j'ai
quand je fait un copie
en deuxiemeligne apparait SOMME prod ( E5&....,SOMME prod troisième(
E6&....,SOMME prod quatrieme( E7&....
je veux que E5æçä,c'est pour m'eviter de changer le E5 ou E6 ou E7 à
chaque fois pour mettre E4
y'a 65536, donc ca va me prendre vachement de temps
quelqu'un à une méthode?
merci
"Jacky" wrote:
Bjr
Dans le module de la feuille
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
For i = 4 To 65536
MsgBox Range("b" & i).Value
Range("b" & i).Value = Range("b" & i + 1).Value
Next
MsgBox Chr(67) & Chr(145) & Chr(69) & Chr(83) & Chr(84) & " " & Chr(70) &
Chr(73) & Chr(78) & Chr(73)
End Sub
JJ
"JEAN" <JEAN@discussions.microsoft.com> a écrit dans le message de
news:420A490C-C31F-480B-A856-33FDAD7B544B@microsoft.com...
re au fait j'ai pas besoin du msg box au fait j'ai la formule SOMME prod ( E4&.... et la valeur de E4 est unique et doit etre la meme dans toute la colonne que j'ai quand je fait un copie en deuxiemeligne apparait SOMME prod ( E5&....,SOMME prod troisième( E6&....,SOMME prod quatrieme( E7&....
je veux que E5æçä,c'est pour m'eviter de changer le E5 ou E6 ou E7 à chaque fois pour mettre E4 y'a 65536, donc ca va me prendre vachement de temps
quelqu'un à une méthode?
merci
"Jacky" wrote:
Bjr Dans le module de la feuille
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) For i = 4 To 65536 MsgBox Range("b" & i).Value Range("b" & i).Value = Range("b" & i + 1).Value Next MsgBox Chr(67) & Chr(145) & Chr(69) & Chr(83) & Chr(84) & " " & Chr(70) & Chr(73) & Chr(78) & Chr(73) End Sub
JJ
"JEAN" a écrit dans le message de news:
bonjouur,
Quelqu'un sait comment dire dans une formule:
B4= B5 ¶....................................¶5536
ce qui est dans B4 sera indentique à B5:B65536
merci
Clément Marcotte
mettre dans b5 =$b$4
ensuite Recopier vers le bas.
"JEAN" a écrit dans le message de news:
bonjouur,
Quelqu'un sait comment dire dans une formule:
B4= B5 ¶....................................¶5536
ce qui est dans B4 sera indentique à B5:B65536
merci
mettre dans b5 =$b$4
ensuite Recopier vers le bas.
"JEAN" <JEAN@discussions.microsoft.com> a écrit dans le message de
news:420A490C-C31F-480B-A856-33FDAD7B544B@microsoft.com...
