VBA, classeur actif pb de destination

Fermé

gopo Messages postés 65 Date d'inscription vendredi 19 septembre 2008 Statut Membre Dernière intervention 23 décembre 2008 - 24 sept. 2008 à 10:00
gopo Messages postés 65 Date d'inscription vendredi 19 septembre 2008 Statut Membre Dernière intervention 23 décembre 2008 - 24 sept. 2008 à 11:09

Bonjour,

J'ai un soucis dans ma ligne de code, il copie la cellule A1 dans la feuille 2 de Teste.xls et m'ouvre la feuille2 de teste1.xls, c'est cool mais il se trompe de classeur .... il reste dans le premier classeur et ne copie pas la A1 dans teste1.xls il ouvre seulement la feuille2....et copie dans le 1er classeur

code :

Private Sub CommandButton1_Click()

Windows("teste.xls").Activate
Sheets("Feuil1").Select
Feuil1.Range("A1:A1").Copy

Windows("teste1.xls").Activate
Sheets("Feuil2").Select
Feuil2.Range("A12:A12").PasteSpecial
Operation = xlPasteSpecialOperationNon

End Sub

Est il possible de mettre Feuil1.Cells(1,1).Copy ??? je voudrais utiliser les Cells au lieu de Range

Amicalement

A voir également:

VBA, classeur actif pb de destination
Cdg destination aéroport arrivée shein ✓ - Forum Consommation & Internet
Incompatibilité de type vba ✓ - Forum Programmation
Vba range avec variable ✓ - Forum VB / VBA
Le fichier est trop grand pour le système de fichier de destination ✓ - Forum Windows
Pourquoi je ne vois plus actif il y a ✓ - Forum Facebook Messenger

2 réponses

Réponse 1 / 2

RailBird
24 sept. 2008 à 10:23

Private Sub CommandButton1_Click()

Dim Variable1 As String

ActiveWorkbook.Sheets("Feuil1").Select
Variable1 = ActiveSheet.Cells(1, 1).Value

Workbooks.Open ActiveWorkbook.Path & "\teste1.xls"
ActiveWorkbook.Sheets("Feuil2").Cells(12, 1).Value = Variable1
ActiveWorkbook.Sheets("Feuil2").Select

End Sub

gopo Messages postés 65 Date d'inscription vendredi 19 septembre 2008 Statut Membre Dernière intervention 23 décembre 2008 2
24 sept. 2008 à 10:44

J'essaie ca tout de suite, merci a toi de ta réponse

Réponse 2 / 2

gopo Messages postés 65 Date d'inscription vendredi 19 septembre 2008 Statut Membre Dernière intervention 23 décembre 2008 2
24 sept. 2008 à 11:09

niquel, jte remercie profondement.. !

Discussions similaires

couche de destination masquée

"L'indice n'appartient à la sélection" + VBA

Changer la résolution du signal actif

Que signifie ''Votre colis est arrivé sur son site de distribution'' ?

Que signifie "actif il y a x minutes" ?

Discussions similaires

Newsletters