M
Macjul
Guest
Bonjour à tous,
J'ai besoin de vos connaissances en macros!
Je suis encore novice sur VBA et j'essaye de réaliser une macro qui convertisse des chiffres du format texte au format nombre, dans n'importe quelle colonne sélectionnée.
J'ai fait plusieurs tentatives (voir macro ci dessous), la macro semble fonctionner. Le problème intervient lorsque je sélectionne une colonne à convertir qui commence par des cases vides. En effet, les données converties remontent parfois vers le haut (vers ces cases vides) et je ne comprends pas pourquoi... 😡
Quelqu'un pourrait-il m'aider?
Macro :
Sub Convertir()
Range("A1").Select
Set plage_col = Application.InputBox("Sélectionnez la colonne à convertir", "SÉLECTION", Type:=8)
plage_col.Select
Selection.TextToColumns Destination:=ActiveCell, DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), TrailingMinusNumbers:=True
End Sub
Merci d'avance
J'ai besoin de vos connaissances en macros!
Je suis encore novice sur VBA et j'essaye de réaliser une macro qui convertisse des chiffres du format texte au format nombre, dans n'importe quelle colonne sélectionnée.
J'ai fait plusieurs tentatives (voir macro ci dessous), la macro semble fonctionner. Le problème intervient lorsque je sélectionne une colonne à convertir qui commence par des cases vides. En effet, les données converties remontent parfois vers le haut (vers ces cases vides) et je ne comprends pas pourquoi... 😡
Quelqu'un pourrait-il m'aider?
Macro :
Sub Convertir()
Range("A1").Select
Set plage_col = Application.InputBox("Sélectionnez la colonne à convertir", "SÉLECTION", Type:=8)
plage_col.Select
Selection.TextToColumns Destination:=ActiveCell, DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), TrailingMinusNumbers:=True
End Sub
Merci d'avance