Ecrire texte avec une variable dans une cellule

Bonjour à tous et toutes,

Je suis bloqué sur un quelque chose plutôt simple en apparence mais je n'ai pas réussi à l'écrire avec la bonne formulation Excel VBA.

Voici le code:

If f0.Cells(1, 2) = "Porteur" Then     'emplacement de la cellule où je récupère la variante P ou M, numeroC correspond à un numéro d'objet qui est récupéré dans une autre cellule 
        numeroC = "P" & numeroC
    Else
        numeroC = "M" & numeroC
End If

f1.Cells(10, compteurcol) = numeroC    'emplacement où je vais écrire mon résultat, M4 ou P31 par exemple

f0 correspond à mon fichier avec les données de mesures et f1 le fichier avec le tableau de statistique. compteurcol est une variable qui correspond à ma première colonne disponible où je peux mettre mes données

Le programme bloque pour une incompatibilité de type sur :

numeroC = "P" & numeroC

Bonjour Furgoz,

Si f0 et f1 sont des fichiers, il manque le nom de la feuille avant la cellule.

Bonjour,

J'ai déjà mis les numéros de feuille avant les cellules:

f0.Cells(1, 2)
f1.Cells(10, compteurcol)

J'ai trouvé une solution à mon problème finalement, il me suffit de rajouter une variable supplémentaire:

If f0.Cells(1, 2) = "Porteur" Then
        numVarC = "P" & numeroC
    Else
        numVarC = "M" & numeroC
End If

f1.Cells(10, compteurcol) = numVarC