Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Convertir données en largeur fixe sans l'entête de colonne?

2 réponses
Avatar
fred
Bonjour,
J'utilise cette macro pour convertir en largeur fixe ma colonne D de données
Columns("D:D").Select
Selection.TextToColumns Destination:=Range("D1"),
DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(2, 1)),
TrailingMinusNumbers:=True
Application.WindowState = xlMinimized
Comment faire pour appliquer cette conversion sans la cellule D1 qui
représente l'entête de la colonne?
Merci

2 réponses

Avatar
DIDI
il faut juste sélectionner la plage voulu sans "D1"

Range("D2:" & Range("D65000").End(xlUp).Address).Select

dans la ligne suivante tu remplace "D1" par "D2"
--
Didi



Bonjour,
J'utilise cette macro pour convertir en largeur fixe ma colonne D de données
Columns("D:D").Select
Selection.TextToColumns Destination:=Range("D1"),
DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(2, 1)),
TrailingMinusNumbers:=True
Application.WindowState = xlMinimized
Comment faire pour appliquer cette conversion sans la cellule D1 qui
représente l'entête de la colonne?
Merci





Avatar
fred
Merci DIDI...je cherchais ce select
Range("D2:" & Range("D65000").End(xlUp).Address).Select
Ca fonctionne;)

"DIDI" a écrit dans le message de news:

il faut juste sélectionner la plage voulu sans "D1"

Range("D2:" & Range("D65000").End(xlUp).Address).Select

dans la ligne suivante tu remplace "D1" par "D2"
--
Didi



Bonjour,
J'utilise cette macro pour convertir en largeur fixe ma colonne D de
données
Columns("D:D").Select
Selection.TextToColumns Destination:=Range("D1"),
DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(2, 1)),
TrailingMinusNumbers:=True
Application.WindowState = xlMinimized
Comment faire pour appliquer cette conversion sans la cellule D1 qui
représente l'entête de la colonne?
Merci