Fonction Gauche- pourquoi ca bug ?

[Metabaron]

Bonjour,
J'ai une macro qui me permet de generer et nommer des onglets en fonction du contenu de 2 colonnes :

-------------------------------------------
Dim i, j, m, n, p As Integer
Dim onglet, nom1, nom2 As String
'i : Plage de lignes de la feuille résultats pour ajout onglets
i = 18

'on va créer un nouvel onglet par ligne possedant une ref

Do While Sheets("Résultats").Cells(i, 4) <> ""
nom1 = Sheets("Résultats").Cells(i, 5)
nom2 = Sheets("Résultats").Cells(i, 4)
onglet = nom1 & nom2

'Créer les nouvelles feuilles à partir d'une feuille modele
Sheets("MODEL_PRELEV").Select
Sheets("MODEL_PRELEV").Copy Before:=Sheets("MODEL_PRELEV")
Sheets("MODEL_PRELEV (2)").Select
Sheets("MODEL_PRELEV (2)").Name = onglet

Jusque là ca marche bien...
mais si le "nom1" est trop long ca devient imbuvable..
donc j'ai voulu faire ca :
nom1 = gauche(Sheets("Résultats").Cells(i, 5);3) --> bref garder que les 3 premiers caracteres de ma cellule..

....et ca marche pas, il refuse la fonction quand le la tape, au niveau du ";" .. c'est surement tout bête, j'ai oublié un truc ? pourtant c'est pas violant comme fonction..

merci d'avance

 

[Legolas]

Re : Fonction Gauche- pourquoi ca bug ?

Bonjour,

En VBA, il faut utiliser la fonction Left.
L'écriture se fait comme ça :
Left(cells(1,1),3) => prends les 3 premiers caractères de la cellule A1

Testes avec et dis nous s'il y a toujours une erreur.

A+

 

[Metabaron]

Re : Fonction Gauche- pourquoi ca bug ?

Super ca marche , j'ai fait mon boulet... donc : Gauche (x ; y ) = en VBA left (x,y).
la prochaine fois, me ferai pas avoir..
merci encore.