Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" <Guy_Excel_2003@bonjour.fr> a écrit dans le message de
news:%23oYTwmLgKHA.3792@TK2MSFTNGP02.phx.gbl...
Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la colonne
"I" (là ou il y a NE) reste en texte.
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la colonne
"I" (là ou il y a NE) reste en texte.
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la colonne
"I" (là ou il y a NE) reste en texte.
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la colonne
"I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la colonne
"I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:
u9OLtRMgKHA.1540@TK2MSFTNGP06.phx.gbl...
Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" <Guy_Excel_2003@bonjour.fr> a écrit dans le message de
news:%23oYTwmLgKHA.3792@TK2MSFTNGP02.phx.gbl...
Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la colonne
"I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Re,
Tu peux essayer avec :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp))).Select
c.Value = Val(c.Value)
Next c
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Re,
Tu peux essayer avec :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp))).Select
c.Value = Val(c.Value)
Next c
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" <Guy_Excel_2003@bonjour.fr> a écrit dans le message de
news:eLAcGfMgKHA.2596@TK2MSFTNGP04.phx.gbl...
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news: u9OLtRMgKHA.1540@TK2MSFTNGP06.phx.gbl...
Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" <Guy_Excel_2003@bonjour.fr> a écrit dans le message de
news:%23oYTwmLgKHA.3792@TK2MSFTNGP02.phx.gbl...
Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Re,
Tu peux essayer avec :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp))).Select
c.Value = Val(c.Value)
Next c
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Oups :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp)))
c.Value = Val(c.Value)
Next c
End Sub
le .select était une scorie du test
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:Re,
Tu peux essayer avec :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp))).Select
c.Value = Val(c.Value)
Next c
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Oups :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp)))
c.Value = Val(c.Value)
Next c
End Sub
le .select était une scorie du test
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:OQBjQKNgKHA.3888@TK2MSFTNGP02.phx.gbl...
Re,
Tu peux essayer avec :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp))).Select
c.Value = Val(c.Value)
Next c
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" <Guy_Excel_2003@bonjour.fr> a écrit dans le message de
news:eLAcGfMgKHA.2596@TK2MSFTNGP04.phx.gbl...
Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news: u9OLtRMgKHA.1540@TK2MSFTNGP06.phx.gbl...
Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" <Guy_Excel_2003@bonjour.fr> a écrit dans le message de
news:%23oYTwmLgKHA.3792@TK2MSFTNGP02.phx.gbl...
Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Oups :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp)))
c.Value = Val(c.Value)
Next c
End Sub
le .select était une scorie du test
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:Re,
Tu peux essayer avec :
Sub convertir_b()
For Each c In Union(Range([a9], [h490].End(xlUp)), _
Range([j9], [j490].End(xlUp))).Select
c.Value = Val(c.Value)
Next c
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:Bonjour,
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à pouvoir
faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
--
Cordialement
Guy
"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de
news:Bonjour,
Quel résultat attends tu de cette modification ?
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Guy72" a écrit dans le message de
news:%Bonjour,
Actuellement, j'ai ce code :
Sub convertir()
For Each c In Range([A9], [H490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Peut-on le modifier pour faire ça ?
Sub convertir()
For Each c In Range([A9], [A9:H490;J9:J490].End(xlUp))
c.Value = Val(c.Value)
Next c
End Sub
Merci de votre aide
--
Cordialement
Guy
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à
pouvoir faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à
pouvoir faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.
Merci de me répondre
Actuellement la plage A9:J490 est en texte.
1012.6 18.4 52 -1.7 77 -5.2 -1.7 0.7 NE 226.3 00:01
1012.7 18.3 52 -1.7 77 -5.2 -1.7 1.8 NE 226.3 00:04
1012.7 18.3 52 -1.7 77 -5.2 -1.7 2.8 NE 226.3 00:07
1012.6 18.3 52 -1.7 77 -5.2 -1.7 1.0 NE 226.3 00:10
1012.7 18.3 52 -1.8 77 -5.3 -1.8 5.4 NE 226.3 00:13
1012.7 18.2 52 -1.8 77 -5.3 -1.8 2.8 NE 226.3 00:16
1012.5 18.2 52 -1.8 77 -5.3 -1.8 2.5 NE 226.3 00:19
1012.6 18.2 52 -1.8 77 -5.3 -1.8 1.4 NE 226.3 00:22
etc.....
Le 1er code transforme la plage A9: J490 en nombre de manière à
pouvoir faires des formules : tel que MAX, MIN etc....
ça fonctionne, mais le problème, c'est que, je souhaiterais que la
colonne "I" (là ou il y a NE) reste en texte.