Macro pour copier-coller des cellules entre 2 feuilles

Bonjour la communauté !

Je suis novice en VBA et j'ai besoin d'un coup de main pour traduire en code la fonction que je veux appliquer à mon Excel.

J'ai essayé de le décrire le plus facilement possible. Je joins le fichier. N'hésitez pas à poser des questions.

Merci beaucoup pour le temps que vous consacrerez à ma demande.

Ce que doit faire la macro :

Commencer une boucle

Commencer la lecture à la feuille "Data" dans la cellule K3

Si 'FeuilData'K3 = France alors Ecrire dans 'FeuilSuivi budgétaire'A2 : France

et copier les cellules 'FeuilData'A3:J3 dans 'FeuilSuivi Budgétaire'B2:K2

Sinon ne rien faire et passer à L3

Si 'FeuilData'L3 = Belgique alors Ecrire dans 'FeuilSuivi budgétaire' A3 : 'Belgique

et copier les cellules 'FeuilData'A3:J3 dans 'FeuilSuivi Budgétaire'B3:K3

Sinon ne rien faire et passer à M3

Si 'FeuilData'M3 = Suisse alors Ecrire dans 'FeuilSuivi budgétaire' A4 : 'Suisse

et copier les cellules 'FeuilData'A3:J3 dans 'FeuilSuivi Budgétaire'B4:K4

Sinon ne rien faire et passer à N3

Si 'FeuilData'N3 = Allemagne alors Ecrire dans 'FeuilSuivi budgétaire' A5 : 'Allemagne

et copier les cellules 'FeuilData'A3:J3 dans 'FeuilSuivi Budgétaire'B5:K5

Sinon ne rien faire et passer à K4

Si 'FeuilData'K4 = France alors Ecrire dans 'FeuilSuivi budgétaire'A6 : 'France

et copier les cellules 'FeuilData'A4:J4 dans 'FeuilSuivi Budgétaire'B6:K6

et ainsi de suite jusqu'à la fin du tableau FeuilData

Merci beaucoup !

47fichier-forum.xlsx (31.12 Ko)

Bonjour et bienvenu(e)

A vérifier

Waoh ! La magie du VBA.

Un grand merci !

Rechercher des sujets similaires à "macro copier coller entre feuilles"