Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Re : Probleme pour alimenter plusieur variable
OK ça marche impec!!!
Je ne savais pas qu'on pouvais alimenter plusieurs variables avec une seule déclaration.
Je te remercie Pierrot
Re : Probleme pour alimenter plusieur variable
Ben non car quand j'arrive là :
Me.Controls("ADRESSE" & nb) = "K:\LEROY MERLIN\MAGASIN\" & MAGAZIN & "\" & Cells(lignemag, 17) & ".pdf"
j'obtiens "Objet spécifié introuvable"
Re : Probleme pour alimenter plusieur variable
Non pas du tout,
je te met mon code:
Private Sub ENVOIMAIL_Click()
Dim nb As Byte
Dim REF As Byte
Dim ADRESSE1 As Variant
Dim ADRESSE2 As Variant
DESTINATAIREMAIL = TextBox12
MAGAZIN = ActiveSheet.Name
NBLIGNELISTE =...
Re : Probleme pour alimenter plusieur variable
Ce que je voulais, c'est que avec une boucle on alimente deux variable:
Dim ADRESSE1 as variant
Dim ADRESSE2 as Variant
Donc il faut juste me donner la syntaxe pour passé de ADRESSE1 à ADRESSE2
NB=1
For REF = 1 To 2...
Re : Probleme pour alimenter plusieur variable
Merci pour la rapidité, en fait je veux pouvoir alimenté plusieurs variable avec une boucle en gardant "ADRESSE" et l'incrémenté de 1 a chaque boucle.
Existe-t-il une solution?
Bonjour,
Je vous explique mon problème.
Dim ADRESSE1 as string
Dim ADRESSE2 as string
Dim NB as byte
NB=1
For REF = 1 To 2
me.controls("ADRESSE" & REF) =NB c'est la que cela ne fonctionne pas
NB=NB+1
Next REF
En gros je voulais savoir si il était...
Re : test de cellules vides
oups merci JNP, mais le fais de savoir quelle cellule est vide peut être utile!!!
alors je modifi
NOMBREdeLIGNEdansleTABLEAU=Range("A" & Range("A" & Cells.Rows.Count).End(xlUp).Row).Row
For COLONNE = 1 to 18 'colonne A à R
For LIGNE = 2 to...
Re : Fusionner deux colonnes séparées en un seul tableau pour test.Khideux
salut Barthos
Désoler mais un petit fichier exemple serait souhaitable!!merci
Re : test de cellules vides
salut Bernard , le fil
J'ai pas testé
NOMBREdeLIGNEdansleTABLEAU=Range("A" & Range("A" & Cells.Rows.Count).End(xlUp).Row).Row
For COLONNE = 1 to 18 'colonne A à R
For LIGNE = 2 to NOMBREdeLIGNEdansleTABLEAU
If cells (LIGNE,COLONNE)=""...
Re : Sélectionner plusieurs colonnes contiguës
salut Magic, le fil
J'ai pas testé mais cela devrait le faire:
Range(Columns(1), Columns(3)).Select
bizzzzzzzzzzzz
Re : Création automatiques de textbox/ labels dans userform
re,
Mais pour quoi ne pas utiliser une listbox avec un label et un textbox qui se rempli quand tu clic sur le list box?
Re : Création automatiques de textbox/ labels dans userform
Salut peshko60
Faire automatiquement un USF est tres long mais en faire plusieur manuellement et le remplir automatiquement est beaucoup plus facile
ecoute j'ai lu ton autre post et je veux bien de filet un coup de main pour...
Re : liste déroulante + fonction recherche
Re,
Alors pour la formule:
Si ($A2<>"" ---->si la valeur de la cellule A2 n'est pas vide on poursuit!!!
la RECHERCHEV sert à trouver une valeur donc "A2" dans la feuille "Données" dans la 3éme colonne "C" de la selection "C2 à J6" , une fois...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.