• Publicité

Aide en VBA pour des copier/coller dans excel 2010

Dans ce forum, vous pouvez poser toutes vos questions concernant l'utilisation de logiciels de bureautique (Microsoft Office, Open Office, etc.)

Modérateurs: Sebastien, Stéphane, Christophe

Aide en VBA pour des copier/coller dans excel 2010

Messagepar kiowas » 24 Juil 2014 12:00

Bonjour à tous,

Je suis novice en VBA et je n'arrive pas a programmer des copier/coller automatique des données.
Je veux tenir à jour un fichier, et j'ai une feuille globale et apres de multipes feuilles en fonction de leur statut.
J'ai besoin de repérer les lignes du tableau global en fonction de la valeur d'une des colonnes (mon critère étant dans la colonne Q), de copier une partie des lignes (les 14 premières colonnes) et de les coller dans la feuille correspondant à son statut.

Je voudrais que les donner se classe automatiquement par ordre alphabétique de la premiere colone.

Je joint le code que j'ai commencer a faire mais qui ne fonctionne pas!!!
je n'ai pas de message d'erreur mais rien ne se fait!!

Code: Tout sélectionner
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("Q2:Q65536")) Is Nothing Then
If Target.Value = "USS Enfant" Then
With Sheets("USS Enfant")
LigVide = .Range("A65536").End(xlUp).Row + 1
.Cells(LigVide, 2) = Target.Offset(0, -13).Value
.Cells(LigVide, 3) = Target.Offset(0, -12).Value
.Cells(LigVide, 4) = Target.Offset(0, -11).Value
.Cells(LigVide, 5) = Target.Offset(0, -10).Value
.Cells(LigVide, 6) = Target.Offset(0, -9).Value
.Cells(LigVide, 7) = Target.Offset(0, -8).Value
.Cells(LigVide, 8) = Target.Offset(0, -7).Value
.Cells(LigVide, 9) = Target.Offset(0, -6).Value
.Cells(LigVide, 10) = Target.Offset(0, -5).Value
.Cells(LigVide, 11) = Target.Offset(0, -4).Value
.Cells(LigVide, 12) = Target.Offset(0, -3).Value
.Cells(LigVide, 13) = Target.Offset(0, -2).Value
.Cells(LigVide, 14) = Target.Offset(0, -1).Value
End With
End If
End Sub


Un truc que je ne sais pas faire et qui m'arrangerais encore plus et que je ne sais pas comment présenté non plus c'est que si le statut d'une ligne change, cela supprime la ligne dans la feuille ou il était avant et le mette dans la nouvelle feuille!!

Si quelqu'un peu m'aider ca serais super
Merci d'avance pour votre aide
kiowas
No0b
No0b
 
Messages: 1
Enregistré le: 24 Juil 2014 10:58

Retourner vers Forum d'entraide : Bureautique

 


  • Articles en relation
    Réponses
    Vus
    Dernier message

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 5 invités

  • Publicité
cron