Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

passer de colonne en ligne

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

zesuila

XLDnaute Occasionnel
Bonjour tous
Voilà, pour créer une base de donnée, je fais des copier coller sur le net d'adresses. et ces adresses je les colle dans excel.en feuille 1
Mais le soucis c'est que ça memet toutes les données en colonne
par ex en a1

en a1 : nom
en a2 adresse
en a3 ville..
je voudrais qu'à chaque fois que je colle en a1 les données, ces données puissent par exemple aller en FEUILLE2 pour créer cette base et que les collages se mettent à lka suite

Merci
 
Trier par date Trier par votes
Re : passer de colonne en ligne

bonjour et merci de ton aide
cela fonctionne mais le soucis c'est que si je rentre à noiuveau des données dans la feuille 1 (ces fameux copier coller du net) les données e la ligne 1 vont être remplacés, et moi ce que je voudrais c'est que ces nouvelles données se mettent à la suite de la ligne 1 et ainsi de suite...
merci encore de m'aider
 
Vote positif 0 Vote négatif
Re : passer de colonne en ligne

bonjour mromain

non ce n'était pas pour toi mon dernier message, ils se sont certainement croisés.
Par contre ce message ci est pour toi ! cela fonctionne à merveille !!!😀

merci beaucoup
et merci aussi à Guillaumega pour son aide
 
Vote positif 0 Vote négatif
Re : passer de colonne en ligne

Je reviens sur cette super solution de mromain.
avec son code :
Private Sub Btn_Transfert_Click()
Range("A1", Range("A" & Rows.Count).End(xlUp)).Copy
With ThisWorkbook.Sheets("Feuil2")
.Range("A" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues, , , True
End With
Application.CutCopyMode = False
End Sub


voici ma base
nom
prenom
adresse
tel


comment faire pour que le code de mromain réagisse sur uniquement les 4 premières cellule de la colonne de la feuille 1 et que lorsque j'ai utilisé son code je supprime ces 4 premières lignes pour avoir les 4 adresses suivantes dans ces cellules et refaire donc le code etc....
parce que là si je fais le code de mromain, il me dit que la zone à copier est différente....je sais c'est pas très clair
 
Vote positif 0 Vote négatif
Re : passer de colonne en ligne

bonjour zesuila, Guillaumega

comment faire pour que le code de mromain réagisse sur uniquement les 4 premières cellule de la colonne de la feuille 1
Cliquez pour agrandir...
pour ce, il faut remplacer
Code: 
Range("A1", Range("A" & Rows.Count).End(xlUp)).Copy
par
Code: 
Range("A1:A4")
par contre, quand je lis
lorsque j'ai utilisé son code je supprime ces 4 premières lignes pour avoir les 4 adresses suivantes dans ces cellules et refaire donc le code etc....
Cliquez pour agrandir...
j'en déduis que tu as une base de la forme

nom1
prenom1
adresse1
tel1
nom2
prenom2
adresse2
tel2
...

si c'est le cas, cette macro serait peut-être plus adaptée : elle copie (et efface de la feuille "Feuil1") toutes les données d'un coup
Code: 
Sub test()
Dim i As Integer
With ThisWorkbook
    'boucler sur toutes les entrées de la feuille "Feuil1" (avec un pas de 4 pour les 4 éléments à copier)
    For i = 1 To .Sheets("Feuil1").Range("A" & .Sheets("Feuil1").Rows.Count).End(xlUp).Row Step 4
        'copier le bloc de 4 éléments
        .Sheets("Feuil1").Range("A" & i & ":A" & i + 3).Copy
        'le coller à la suite des données de la feuille "Feuil2" (en le transposant)
        .Sheets("Feuil2").Range("A" & .Sheets("Feuil2").Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues, , , True
        'effacer le bloc de 4 éléments
        .Sheets("Feuil1").Range("A" & i & ":A" & i + 3).ClearContents
    Next i
End With
Application.CutCopyMode = False
End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
312
vgendron
L
  • Résolu(e)
Power Query Problème de fusion de données entre deux fichiers Excel sous Power Query
Réponses
8
Affichages
429
chris
B
  • Question Question
XL 2019 trouver le plus grand numéro
Réponses
11
Affichages
573
Blafi
B
  • Résolu(e)
Microsoft 365 Extraction d'informations sur différents onglets en partant d'une base de données
Réponses
7
Affichages
693
MBax
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
924
spike29
S
D
  • Résolu(e)
XL 2021 Selection listview et Envoie Emails automatique
Réponses
4
Affichages
362
delsart59
D
C
  • Question Question
Microsoft 365 Liste déroulante en colonne 2 en fonction de la colonne 1
Réponses
9
Affichages
850
chris
J
  • Question Question
XL 2021 Macro : avoir les mois en chiffres de 1 à 12 en colonne à chaque ligne différente
Réponses
5
Affichages
473
jerome91
J
A
  • Question Question
Autres EXCEL 2024-Formule complexe - demande d'aide - solution
Réponses
1
Affichages
516
Dranreb
  • Question Question
Microsoft 365 [RESOLU] VBA | Concaténation des adresses avec répétitions si le complément de voie est renseigné.
Réponses
14
Affichages
1 K
patricktoulon
A
  • Question Question
XL 2021 Générer des données à partir d'une ligne spécifique jusqu'à une autre
Réponses
5
Affichages
546
gbinforme
G
M
  • Question Question
XL 2021 Rechercher dans une matrice le texte d'une cellule et copier les 10 lignes situées en dessous de ce texte retrouvé
Réponses
2
Affichages
466
JHA
J
H
  • Question Question
XL 2021 importer automatiquement des données à partir d'un tableau en fonction du jour du mois
Réponses
2
Affichages
729
Hamid84
H
D
  • Résolu(e)
Microsoft 365 Graphique avec plage de données glissante en partant d'une date
Réponses
5
Affichages
787
Dégé59
D
M
  • Question Question
XL 2010 Comment renommer les colonnes A,B, C par un titre de colonne ?
Réponses
8
Affichages
1 K
TooFatBoy
E
  • Question Question
Microsoft 365 Fonction de decalage de cellule vers le bas
Réponses
14
Affichages
667
Cousinhub
Z
  • Question Question
XL 2016 RECHERCHEV et double liste de choix
Réponses
2
Affichages
971
zendb
Z
  • Question Question
Microsoft 365 RESOLU - Macro - Recherche de lignes identiques et ressortir les lignes uniques
Réponses
8
Affichages
822
Akortys
S
  • Question Question
XL 2019 Calculer dimanche de pâques puis insertion du 29 février
2
Réponses
26
Affichages
884
dysorthographie
A
  • Question Question
XL 2021 Automatiser la génération de documents Word à partir d’Excel avec VBA
Réponses
12
Affichages
894
ali591
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…