XL 2016 Automatiser une macro au changement de valeur

[YANNISE]

Bonjour le forum,

Je reviens vers vous afin que vous m'aidez à ajouter une fonction qui me permet d'activer une macro d'import des données au changement de la date sur la feuille 1 C26

Sachant qu'une autre macro est déjà activée au changement de la cellule G26 sur la feuille 1.

- Macro déjà existe sur Feuill1 :

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$G$26" And Range("G26") <> "" Then
Call Transfert_2

Else: Exit Sub
End If

Debug.Print mymodule

End Sub

Je vous remercie d'avance, mon fichier ci-joint

 

[fanfan38]

Bonjour et bienvenu sur le forum

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$G$26" And Range("G26") <> "" Then
    Call Transfert_2
  ElseIf Target.Address = "$C$26" Then
    Importer_New
  Else
    Exit Sub
  End If
Debug.Print mymodule
End Sub

A+ François

 

[YANNISE]

Bonjour fanfan38, le forum,

merci fanfan38 pour l'aide, il a fonctionné mais j'ai un problème

j'ai ajouté Microsoft Date and Time Picker Control 6.0 (SP6) et lié avec la date dans la cellule C26

Mais quand je ouvert mon fichier le calendrier Microsoft s'affiche en haut !! il faut que je bouge la feuille en haut ou en bas pour que le deuxième affichage en haut disparaitre.

Après que je la bouge le calendrier prend forme :

ainsi quand je choisis une date depuis le calendrier Microsoft il me faut cliquer doublement sur la cellule C26 pour que la macro s'exécute

merci beaucoup pour votre aide.

 

[fanfan38]

Bonjour
J'ai mis mon calendrier...

A+ François

 

[YANNISE]

fanfan38 super intéressant, mais ce n'est pas compatible avec mes macros

la macro "importer" ne fonctionne plus + sur la cellule C26 je suis amenée à saisir manuellement parfois selon besoin.

Existe-t-il une solution simple pour les bugs sur mon fichier

merci

 

[fanfan38]

Excuse c'est moi qui avait désactivé "importer"

A+ François

 

[YANNISE]

y a une erreur d'exécution '424'

 

[fanfan38]

set wsh1=Sheets("Feuil1")
devrai fonctionner
A+ François

 

[YANNISE]

Super merci fanfan38