Inscription
4 janvier 2012
Dernière intervention
12 septembre 2013
Interventions
35
Signature

Problème d'incompatibilité de forme

Salut j'ai fais le programme qui suit mais à chaque fois il m'affiche erreur incompatibilité de forme. Private Sub CommandButton3_Click() Dim d As Integer Dim j As TextBox Dim k As Integer 'Call CommandButton1_Click j = TextBox26 If j 0 Then For d = 1 To n s.Offset(d - 1, 3 + j.Value).Value = Controls("Textbox" & (d + 1)).Valu... Lire la suite

Création d'un tableau dans un userfom comprenant 9 lignes et 3 colonnes [Résolu]

Salut je voudrai créer dans un userform un tableau de 9 lignes 3 colonnes comprenant des labels et des textbox. Dans la première colonne 9 label, dans la deuxième colonne 9 label et dans la troisième colonne 9 textbox. Merci

Nombre d'occurence dans une plage de données d'une valeur saisie dans un text bo [Résolu]

Salut, Je voudrai connaitre le nombre d'occurrence d'une valeur saisie dans un textbox dans une plage de données. La textbox est dans un userform en cliquant le bouton ok je voudrai qu'il m'affiche le nombre n d'occurence. Private Sub CommandButton1_Click() Dim a As Range Dim n As Integer n = 0 For Each a In Feuil5.Range("D2:D" & ... Lire la suite

Affichage dans un userfom

Salut, J'ai une liste de magasins accompagné de leur code identifiant et d'une liste de produits avec leur code identifiant. Je voudrai réaliser un userform qui me permettrai dès que je tape le code du magasin m'afficher les noms et les codes des produits qu'il vend. Et devant chaque produits et un code produit il m'affiche un champ dans... Lire la suite

Compter dans une liste de code le nombre d'occurrence simultanée dans chaque cod [Résolu]

Salut, j'ai un problème sur l'execution de mon code ça m'envoi tjrs zeros. En fait je voudrai compter le nombre de code dans lesquels apparaissent 11 au debut et a à la fin. Voici le programme que j'ai essayé merci de m'aider. Sub quotass() Dim i As Integer Dim j As Integer Dim k As Integer Dim l As Integer Dim nb As Integer nb ... Lire la suite