Trouver et deplacer des colonnes avec VBA

Résolu/Fermé

supermoun Messages postés 38 Date d'inscription dimanche 10 septembre 2006 Statut Membre Dernière intervention 26 juillet 2009 - 10 juin 2008 à 20:45
jojo - 30 avril 2010 à 21:25

Bonjour à tous,

J'ai un tableau sous excel qui contient des dates( exemple tout le mois) sur une ligne.
Des données sous chaque jour.

A travers deux textbox, j'inscrit une plage de dates ou une seule date.
Si la routine trouve la ou les dates, faire un copier des colonnes correspondantes dans une autre feuille.

Si quelqu'un a la réponse.

Merci d'avance.

A voir également:

Trouver et deplacer des colonnes avec VBA
Déplacer une colonne excel - Guide
Trouver adresse mac - Guide
Comment faire des colonnes sur word - Guide
Classer par ordre alphabétique excel plusieurs colonnes - Guide
Trouver un lieu avec coordonnées gps - Guide

2 réponses

Réponse 1 / 2

lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
8 juil. 2008 à 15:14

Oui,... mais alors donne plus de renseignements sur les critères de recherche...

Réponse 2 / 2

lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
10 juin 2008 à 22:11

Bonjour,
Si ca peut servir...

'Sélectionne une colonne entière et la copie dans une autre feuille
Sub CopieColonne()
    Sheets("Feuil1").Select
    Columns("D:D").Select
    Selection.Copy
    Sheets("Feuil2").Select
    Columns("J:J").Select
    ActiveSheet.Paste
End Sub

A+

supermoun Messages postés 38 Date d'inscription dimanche 10 septembre 2006 Statut Membre Dernière intervention 26 juillet 2009 7
7 juil. 2008 à 21:12

Bonsoir Lermite 222,

Excuse pour le retard et merci pour la réponse.

Mais le problème, c'est de tester une date ou une zone de dates à partir des renseignements
fournis par les textbox.
A+

dave dave > supermoun Messages postés 38 Date d'inscription dimanche 10 septembre 2006 Statut Membre Dernière intervention 26 juillet 2009
31 oct. 2008 à 16:52

Bonjour,
Je rencontre le même problème que vous à savoir: de tester le titre pour sélectionner la colonne.
Avez vous trouvé une solution ?

Merci

DD

jojo
30 avril 2010 à 21:25

'Sélectionne une colonne entière et la copie dans une autre feuille
Sub CopieColonne()
Sheets("Feuil1").Select
Columns("D:D").Select
Selection.Copy
Sheets("Feuil2").Select
Columns("J:J").Select
ActiveSheet.Paste
End Sub

Peut etre remplacer par:
Sub CopieColonne()
Sheets("Feuil1"). Columns("D:D").Copy destination:= Sheets("Feuil2").Columns("J:J")
End Sub
il me semble, non?

Discussions similaires

Comment trouver un numéro à partir du nom et prénom

Comment trouver une adresse avec un nom de famille ?