Macro copier/coller avec « si »

[Gipiwa]

bonjour à tous!
Je souhaite exécuter une macro qui selon les cellules remplies sélectionnerait différentes plages.
Je m’explique:
Si La cellule F16 contient « total général » sélectionner F1:G13
Si la cellule F17 contient « total général » sélectionner F1:G17
Et ainsi de suite...
tout d’abord est-ce possible ? Et quel serait le code pour l’effectuer ?
Merci pour votre aide !

 

[kingfadhel]

bonjour,
Un fichier joint sera le bienvenu.

 

[Gipiwa]

Voici un exemple. J’espère que c’est compréhensible..

 

[Calvus]

Bonjour,

Pas très clair tout ça...

Code :

Sub selection()
If IsEmpty(Range("G15")) Then Range("G1:I13").Select: Exit Sub
If IsEmpty(Range("G16")) Then Range("G1:I16").Select: Exit Sub
If IsEmpty(Range("G17")) Then Range("G1:I17").Select: Exit Sub
If IsEmpty(Range("G18")) Then Range("G1:I18").Select: Exit Sub
End Sub

Bonne journée

 

[Gipiwa]

Je conçois que ce n’est pas très clair. Je vais essayer de l’être plus:
Le tableau en G1:I12 est fixe sa dimension ne bouge pas. Mais le tableau qui débute en G14 est lui variable, il peut ne pas exister, avoir 1,2,3,... lignes. (Comme un tableau croisé dynamique en fait)
Ce que je voudrais faire est qu’en activant la macro il soit sélectionné et copié soit juste le 1er tableau si le second n’existe pas. Soit le 1er tableau et le 2eme avec le nombre de lignes correspondantes.
J’espère que c’est un peu plus clair..

 

[Calvus]

Re,

Désolé, mais pas de tableau dans l'exemple.
Le code fonctionne, en fonction de ce que tu as demandé et de l'exemple que tu as envoyé..

A+

 

[Gipiwa]

Re,

Désolé, mais pas de tableau dans l'exemple.
Le code fonctionne, en fonction de ce que tu as demandé et de l'exemple que tu as envoyé..

A+

Je te remercie ! Ça sélectionne en effet correctement. Mais j’ai encore une petite question... je n’arrive pas à intégrer dans le code le fait que ça copie la sélection. Peut être une idée ? Merci