Copier/Coller dans Excel en VB [Résolu]
Signaler
aurelien2723
aurelien2723
- Messages postés
- 181
- Date d'inscription
- jeudi 12 janvier 2006
- Statut
- Membre
- Dernière intervention
- 26 janvier 2011
aurelien2723
- Messages postés
- 181
- Date d'inscription
- jeudi 12 janvier 2006
- Statut
- Membre
- Dernière intervention
- 26 janvier 2011
A voir également:
- Vb6 cstr
- Cstr visual basic - Meilleures réponses
- Cstr vb - Meilleures réponses
- Copier-coller graph excel dans VB ✓ - Forum - Visual Basic
- Ajouter des commentaires en copiant-collant vers votre code vb - Codes sources - Visual Basic / VB.NET (Divers)
- Copier / Coller tableau excel sous forme d'image dans PowerPoint - Codes sources - Visual Basic / VB.NET (VBA)
- Copier / Coller d'EXCEL vers un éditeur de texte comme NOTEPAD. ✓ - Forum - Visual Basic
- Copier/coller sur Excel depuis vb6 ✓ - Forum - Visual Basic 6
6 réponses
mulraf
- Messages postés
- 18
- Date d'inscription
- vendredi 24 février 2006
- Statut
- Membre
- Dernière intervention
- 12 mai 2006
Bien sur que oui, tu définit deux entiers "Debut" et "Fin" comme cela :
Dim Plage As String
Dim Debut As Integer
Dim Fin As Integer
Debut = 25
Fin = 26
Plage = CStr(Debut) + ":" + CStr(Fin)
Rows("194:195").Select
Selection.Cut
Rows(Plage).Select
ActiveSheet.Paste
Et le tour est joué !
Dim Plage As String
Dim Debut As Integer
Dim Fin As Integer
Debut = 25
Fin = 26
Plage = CStr(Debut) + ":" + CStr(Fin)
Rows("194:195").Select
Selection.Cut
Rows(Plage).Select
ActiveSheet.Paste
Et le tour est joué !
mulraf
- Messages postés
- 18
- Date d'inscription
- vendredi 24 février 2006
- Statut
- Membre
- Dernière intervention
- 12 mai 2006
Si tu coupes deux lignes il faudra spécifier aussi deux lignes pour le collage comme cela par exemple :
Rows("194:195").Select
Selection.Cut
Rows("20:21").Select
ActiveSheet.Paste
Rows("194:195").Select
Selection.Cut
Rows("20:21").Select
ActiveSheet.Paste
aurelien2723
- Messages postés
- 181
- Date d'inscription
- jeudi 12 janvier 2006
- Statut
- Membre
- Dernière intervention
- 26 janvier 2011
le truc c'est comment affecter une valeur à Rows avec une variable? svp
mulraf
- Messages postés
- 18
- Date d'inscription
- vendredi 24 février 2006
- Statut
- Membre
- Dernière intervention
- 12 mai 2006
Tu définit un type string ici "Plage" et tu lui donne la valeur de la plage ou tu désire coller tes données :
Dim Plage As String
Plage = "25:26"
Rows("194:195").Select
Selection.Cut
Rows(Plage ).Select
ActiveSheet.Paste
C'est tout !
Dim Plage As String
Plage = "25:26"
Rows("194:195").Select
Selection.Cut
Rows(Plage ).Select
ActiveSheet.Paste
C'est tout !