Macro VBA Mise en forme conditionnelle en fonction de deux variables

Bonjour,

Je souhaite créer une mise en forme conditionnelle puis développer ma macro. A noter que la colonne G indique le nom des opérateurs

Voici les conditions :

Si dans la colonne G il n'y a qu'un opérateur alors je veux pouvoir développer ma macro qui est :

Dim I As Long
For I = [B65000].End(xlUp).Row To 4 Step -1
Rows(I).Resize(5).Insert
Next I

Si par contre dans la colonne G il y a deux opérateurs (à noter que les cellules sont fusionnés), alors je veux pouvoir développer ma macro qui est :

Dim I As Long
For I = [B65000].End(xlUp).Row To 4 Step -1
Rows(I).Resize(11).Insert
Next I

Pour information, ce qui change est le nombre de Resize, de 5 à 11.

Bonjour,

Sur l'exemple le contenu des cellules en G sont identique (toujours 2 lettres), quel sont les différentes possibilités d'affichage ?

Joindre un fichier svp

Je vous envoi les fichiers, n'hésitez pas pour toutes questions.

Merci infiniment !

Eh bien je ne comprend pas la finalité de la macro mais voici la demande:

Sub Ajouter_Lignes()
'
' Ajouter_Lignes Macro
'

'
Dim I As Long
For I = [B65000].End(xlUp).Row To 7 Step -1
If Cells(I, 1) <> Cells(I - 1, 1) And Cells(I, 1) = Cells(I + 1, 1) And Cells(I, 1) <> "" Then
    Rows(I).Resize(5).Insert
    Else
    If Cells(I, 1) <> Cells(I - 1, 1) And Cells(I, 1) <> "" Then
    Rows(I).Resize(11).Insert
    Else
    End If
End If
Next I
End Sub

Par contre faire des macro avec des cellules fusionnés n'est pas conseillé, ça fout très vite le bordel. De préférence, il faut défusionner les cellules quitte à devoir recopier les valeurs en double