Premiere macro
bonsoir,
j'ai récupéré un fichier de données généalogique que je souhaiterai retraiter
ex: XXXXX AAAAAAAAA
XXXXX BBBBBB
XXXXX CCCCCCCC
pour devenir
AAAAAAAAA
BBBBBB
CCCCCCCC
j'ai réalisé ma première macro et cela me donne
AAAAAAAAA sur les 3 lignes
d'autre part je voudrai qu'à chaque modification je puisse aller à la ligne suivante
Comment faire ?
Merci par avance à ceux qui voudront bien me répondre
Bonjour et bienvenue sur ce forum,
Merci de mettre un fichier en ligne. Ce sera plus facile de voir ce à quoi tu veux arriver.
Amicalement
Dan
bonjour
ci-joint une partie du fichier
https://www.excel-pratique.com/~files/doc2/essai_fichier.xls
je souhaite supprimer 2DATE (+ l'espace) sur chaque ligne
merci encore
Salut
Voici une macro que j'ai fait en automatique qui permet d'effacer ce que tu veux et de supprimer la colonne qui ne t'intéresse pas.
Par contre, je pense que tu risques d'avoir un problème avec le traitement des dates (dates en anglais, pas reconnu comme des dates sous mon Excel)
Sub macro()
' fonction convertir
Columns("A:A").Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(7, 2)), TrailingMinusNumbers:=True
' effacer la colonne de gauche
Selection.Delete Shift:=xlToLeft
' largeur de colonne
Selection.ColumnWidth = 30.57
' centrer le texte
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
End Sub
En espérant que ça puisse t'aider un peu
Rochelle
Re,
Merci de ton fichier.
Pas besoin de macro pour cela puisqu'excel t'offre une fonction.
Suis ce lien et l'explication de NAD le 20/08 à 12:35 --> https://forum.excel-pratique.com/viewtopic.php?t=12889
Amicalement
Dan
PS : N'oublie pas de mettre RESOLU sur le fil si ton souci est solutionné. explications ici -> https://forum.excel-pratique.com/viewtopic.php?t=13