Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Pourquoi "Range(cells...." ? Enlève "range" puisque "cells" définit déjà un range. Cordialement. Daniel "Albatroz" a écrit dans le message de news:
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row Range(Cells(i.Row, j.Column)).Value > Range(Cells(i.Row, j.Column)).Value * 2214 Next i Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne: Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row, j.Column)).Value * 2214
Mais Pourquoi??
Merci d'avance pour vos reponses.
++
Bonjour.
Pourquoi "Range(cells...." ? Enlève "range" puisque "cells" définit déjà un
range.
Cordialement.
Daniel
"Albatroz" <pierre_even@hotmail.com> a écrit dans le message de news:
1171049490.465036.108030@k78g2000cwa.googlegroups.com...
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel
j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row
Range(Cells(i.Row, j.Column)).Value > Range(Cells(i.Row, j.Column)).Value * 2214
Next i
Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne:
Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row,
j.Column)).Value * 2214
Bonjour. Pourquoi "Range(cells...." ? Enlève "range" puisque "cells" définit déjà un range. Cordialement. Daniel "Albatroz" a écrit dans le message de news:
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row Range(Cells(i.Row, j.Column)).Value > Range(Cells(i.Row, j.Column)).Value * 2214 Next i Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne: Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row, j.Column)).Value * 2214
Mais Pourquoi??
Merci d'avance pour vos reponses.
++
anonymousA
Bonjour,
tout simplement parce que i et j sont des valeurs reconnues par Excel comme des valeurs de type différents d'un range et i.row et j.column n'ont aucun sens si i et j ne sont pas des objets range.
A+
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row Range(Cells(i.Row, j.Column)).Value > Range(Cells(i.Row, j.Column)).Value * 2214 Next i Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne: Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row, j.Column)).Value * 2214
Mais Pourquoi??
Merci d'avance pour vos reponses.
++
Bonjour,
tout simplement parce que i et j sont des valeurs reconnues par Excel
comme des valeurs de type différents d'un range et i.row et j.column
n'ont aucun sens si i et j ne sont pas des objets range.
A+
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel
j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row
Range(Cells(i.Row, j.Column)).Value > Range(Cells(i.Row, j.Column)).Value * 2214
Next i
Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne:
Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row,
j.Column)).Value * 2214
tout simplement parce que i et j sont des valeurs reconnues par Excel comme des valeurs de type différents d'un range et i.row et j.column n'ont aucun sens si i et j ne sont pas des objets range.
A+
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row Range(Cells(i.Row, j.Column)).Value > Range(Cells(i.Row, j.Column)).Value * 2214 Next i Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne: Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row, j.Column)).Value * 2214
Mais Pourquoi??
Merci d'avance pour vos reponses.
++
anonymousA
Bonjour,
ca ne marchera pas non plus.
A+
Bonjour. Pourquoi "Range(cells...." ? Enlève "range" puisque "cells" définit déjà un range. Cordialement. Daniel "Albatroz" a écrit dans le message de news:
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row Range(Cells(i.Row, j.Column)).Value >> Range(Cells(i.Row, j.Column)).Value * 2214 Next i Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne: Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row, j.Column)).Value * 2214
Mais Pourquoi??
Merci d'avance pour vos reponses.
++
Bonjour,
ca ne marchera pas non plus.
A+
Bonjour.
Pourquoi "Range(cells...." ? Enlève "range" puisque "cells" définit déjà un
range.
Cordialement.
Daniel
"Albatroz" <pierre_even@hotmail.com> a écrit dans le message de news:
1171049490.465036.108030@k78g2000cwa.googlegroups.com...
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel
j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row
Range(Cells(i.Row, j.Column)).Value >> Range(Cells(i.Row, j.Column)).Value * 2214
Next i
Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne:
Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row,
j.Column)).Value * 2214
Bonjour. Pourquoi "Range(cells...." ? Enlève "range" puisque "cells" définit déjà un range. Cordialement. Daniel "Albatroz" a écrit dans le message de news:
Salut tout le monde,
J'ai un dans mafeuille excel un um range (colonne B a H) dans lequel j'aimerais convertir la valeur (en tonne) vers des livres (LB)
Voila mon code:
Dim LBMT As Variant
LBMT = Worksheets("MSA").Range("c" & 1).Value
If LBMT = "MT" Then
For j = 2 To 8
For i = 8 To Cells(65000, 5).End(xlUp).Row Range(Cells(i.Row, j.Column)).Value >> Range(Cells(i.Row, j.Column)).Value * 2214 Next i Next j
End If
End Sub
Vous l'aurez deviner, cela ne marche pas; ca bloque la ligne: Range(Cells(i.Row, j.Column)).Value = Range(Cells(i.Row, j.Column)).Value * 2214
Mais Pourquoi??
Merci d'avance pour vos reponses.
++
Albatroz
Exact ca ne marche pas non plus, Mais que faut il faire alors, as tu une solution AnonymousA? Merci
Exact ca ne marche pas non plus,
Mais que faut il faire alors, as tu une solution AnonymousA?
Merci