Macros exel
lgamine
Messages postés
17
Statut
Membre
-
wilfried_42 Messages postés 912 Statut Contributeur -
wilfried_42 Messages postés 912 Statut Contributeur -
slt
slvp je veut creer un macros en exel qui me permet de separer des donne dans un seul colonne dans deux nouveau colonne;les donne sont separer par des /
slvp je veut creer un macros en exel qui me permet de separer des donne dans un seul colonne dans deux nouveau colonne;les donne sont separer par des /
Configuration: Windows XP Internet Explorer 7.0
A voir également:
- Macros exel
- Exel 2013 - Télécharger - Tableur
- Comment trier sur exel - Guide
- Liste deroulante exel - Guide
- Macros word - Guide
- Maintenance macros excel - Forum Bureautique
3 réponses
Bonjour
il n'y a pas besoin de macro, une formule (même si elle est compliquée) suffit très bien
Voici un classeur avec un formule en colonne et une formule en ligne
Elle est entièrement expliquée
Télécharger le classeur
il n'y a pas besoin de macro, une formule (même si elle est compliquée) suffit très bien
Voici un classeur avec un formule en colonne et une formule en ligne
Elle est entièrement expliquée
Télécharger le classeur
mais le pb que in y entrain de creer un macros globale on on a le pb dans ce truc la .alors je suis besion d'un macros
merci de tt facon
merci de tt facon
Ok
voici un fonction personnalisée : à placer dans un module (selon la version)
Utilisation : en b1 : =Index($A1;colonne()-1)
puis tirer vers la droite et enfin vers le bas
une Macro à lancer : à placer dans un module (selon la version)
voici un fonction personnalisée : à placer dans un module (selon la version)
Function Decoupe(Byval Macell as range) as variant
Dim tablo as variant
tablo = split(Macell.value,"/")
Decoupe = tablo
End Function
Utilisation : en b1 : =Index($A1;colonne()-1)
puis tirer vers la droite et enfin vers le bas
une Macro à lancer : à placer dans un module (selon la version)
sub Decoupe()
dim i as long, j as integer
dim tablo as variant
for i = 1 to range("A65536").end(xlup).row
tablo = split(Range("A" & i),"/")
for j = 0 to ubound(tablo)-1
range("B" & i).offset(0,j) = tablo(j)
next j
next i
end sub