Boucler sur des textbox

[J-Charles]

Bonjour à tous,
J'ai un petit problème à résoudre et j'ai beau faire le tour, je n'ai pas pas trouvé la solution. Je compte donc sur vous pour me donner un coup de pouce.
J'ai mis directement sur une feuille excel des Textbox de type activeX, nommé TxtPS1, TxtPS2 .. jusqu'à 10. Je voudrais simplement boucler dessus et voir s'ils sont vides ou pas. Dans le cas où ils sont vides cela alimente un compteur. Voici mes quelques lignes de code:

Dim ComptPS as integer
    ComptPS = 0
    For I = 1 To 10
        If Controls("TxtPS" & I).Value <> "" Then ComptPS = ComptPS + 1
    Next I

Malheureusement j'ai une erreur d'exécution 91 :Variable objet ou variable de bloc With non définie. Je suis incapable de résoudre cette erreur. Pourriez vous donc m'aider ?
Merci d'avance

 

[pierrejean]

Re : Boucler sur des textbox

Bonjour J-Charles

Avec un petit fichier test (sans données confidentielles ) on sera peut-être en mesure de t'aider

Edit : Salut Jean-Marcel

 

[J-Charles]

Re : Boucler sur des textbox

OK je vais vous préparer cela, mais je dois m'absenter jusqu'à 20h00. Je vous ferais parvenir un fichier qui sera TRES épuré Je travaille sous Excel 2007.
Merci beaucoup de vous pencher sur mon pb alors je vous dis à ce soir.

 

[J-Charles]

Re : Boucler sur des textbox

Ci-joint mon fichier "très épuré", avec quelques explications supplémentaire. j'espère que je suis assez clair si non je vous apporterez plus de précisions si besoin et à votre demande.
Merci et bonne soirée

 

[pierrejean]

Re : Boucler sur des textbox

Re

Vois si cela te convient