Bug dans enregistre dans autre Classeur

Résolu
dooblemixte Messages postés 8 Date d'inscription   Statut Membre Dernière intervention   -  
dooblemixte Messages postés 8 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous et toutes,

Je bloque sur une commande d'enregistrement de données dans un autre classeur, je vous livre mon vba de petit joueur en espérant trouver une bonne ame pouvant resoudre ma prise de tête.

Cordialement votre. 



Private Sub AjouterProprio_Click()
Application.ScreenUpdating = False

'   Worksheets("BD").Activate
'   Enregistre dans un autres classeur
    Workbooks.Open Filename:="C:\Users\Bibi\Dropbox\BDDHH\BddHH.xls"
    Sheets("Locataire").Select
    Sheets("Locataire").Activate


'Va chercher la dernière ligne de la colonne H puis se place
'en dessous
Columns(1).Find("*", , , , , xlPrevious).Offset(1, 0).Select

    ActiveCell = NomProprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = PrenomProprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = AdresseProprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = CPProprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = CmneProprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = Tel1Proprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = Tel2Proprio
        ActiveCell.Offset(0, 1).Select

    ActiveCell = MailProprio
        ActiveCell.Offset(0, 1).Select
        
    ActiveCell = NomProprio & " " & PrenomProprio
    
    ActiveWorkbook.Save
    ActiveWorkbook.Close
    
    Unload Me
    
   Worksheets("BD").Activate
Worksheets("Accueil").Activate
Application.ScreenUpdating = True
Unload Me

End Sub



5 réponses

Réponse 1 / 5
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Sais pas si j'ai compris,
Les variables ne sont pas commune à des classeurs différent.
Mais ton code n'est pas fort clair
Les variables sont dans quel classeur ? et tu écrit dans quel classeur ?
A+
0
Réponse 2 / 5
dooblemixte Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour lermite222

Les variables sont sur le classeur GesLocHH.xls

Le classeur que je dois ouvrir pour l'enregistrement est sur ce lien, 

 "C:\Users\Bibi\Dropbox\BDDHH\BddHH.xls"  
Sheets("Locataire").Select

Ce dernier s'ouvre bien, mais j'ai un message d'erreur que je ne comprends pas.

Worksheets("BD").Activate était la variable précédemment utiliser

Merci pour ton aide
0
Réponse 3 / 5
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

En attendant lermite:

Ce dernier s'ouvre bien, mais j'ai un message d'erreur que je ne comprends pas. Donnez le texte de ce message, cela aidera beaucoup lermite !!!!
0
Réponse 4 / 5
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour Fxx :-)

Exact, ce message est indispensable.
Mais avec les renseignements complémentaires cela devient évident que les variables sont sur un classeur et l'emploi sur un autre.

Essaye d'expliquer plus clairement, la macro est sur le classeur GesLocHH.xls ?
C'est où que tu assigne les variables NomProprio, etc
Tes variables sont déclarées ? et où ?
Un pourais déposer un exemple de ton classeur GesLocHH.xls, sans donnée confidentielles ? (sur Cjoint.com par exemple)
Tu dis.

Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
Note: Je ne répond pas aux MP pour les questions techniques. Et ma boule de cristal est cassée .
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 5
dooblemixte Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour a vous deux

En fait j'ai trouver une autre solution dans des exemples glaner sur le net ce qui ma permis de faire fonctionner mon projet.

Merci à vous de votre courtoisie et votre dévouement.

Je clos le sujet
0

Discussions similaires

Iptv beug
leogauthier15 -
bazfile -

1 réponse
Problème IPTV SMARTER
eneleh49 -
glandu -

1 réponse
Smart IPTV met un temps fou à charger depuis que je suis passé à la fibre
Ancaro13 -
glandu -

3 réponses
Bug de chaîne IPTV
GeraltDeRiv13 -
bazfile -

1 réponse
J'ai un problème avec la géolocalisation Snapmap
Solex1986 -
Dougy -

5 réponses