XL 2016 copier coller avec condition

[Lahou02]

Bonjour à tous,

Je n’ai aucune connaissance en VBA ,même mes connaissances en Excel sont limitées.
J’ai besoin de votre aide pour créer des macros dans un classeur.

Ma demande :
En appuyant sur un bouton ,je vais transférer les données ( C4 au C15 ) vers la feuil 1
selon le mois qui corresponds à la cellule C3

veuillez trouver le fichier en PJ .

je vous remercie d'avance

 

[_Thierry]

Bonjour @Lahou02 , le Forum

Voici une approche 100% VBA, je me suis efforcé de faire du code simple et de nommer de manière claire et compréhensible toutes les variables, pour que tu puisses suivre un peu...

J'ai fait une mini gestion de détection de doublon, au cas où....

Bonne découverte et bon courage...
Bien à toi, à vous
@+Thierry

 

[Lahou02]

très bien fait Thierry , mais lorsque je change le mois les valeurs ne s'enregistrer pas dans le mois précédent ..je souhaite que les valeurs reste enregistrer dans le tableau lorsque je change le mois.


merci d'avance

 

[_Thierry]

Re Bonjour, @Lahou02 , le Forum

C'est une démo, pour que ca ne s'éfface pas il faut envoyer des BitCoins !!!
ARF Meuh non, je déconne !!!

Pour que ca ne s'efface pas, il faut que tu neutralises cette ligne :

WSCible.Range("D7:O31").ClearContents

maintenant qu'on efface plus tu riques d'avoir tout le temps des messages de doublons, si tu n'en as pas l'utilité, tu peux aussi neutraliser cette ligne :

MsgBox "Sur " & CellCible.Offset & " il y a eu au moins un doublon, la somme a été cummulée !", vbInformation

Bien à toi, à vous
@+Thierry

 

[Lahou02]

haha franchement u m'as sauvé , j'ai pas de mots pour te remercier
ça fonctionne parfaitement , mais je reçois des messages pour les doublant car cela ne me dérange pas d'avoir des doublant

Bitcoinnement

 

[Lahou02]

c'est bon ça marche parfaitement 😉