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.
Bonne année à tous
j'ai une cellule avec comme formule
=SI(Site!AP2=0;",";"http://www.monsite.fr/soft/images/"&Site!AP2)
elle fonctionne très bien, cela me met une "," si la cellule est =0 ou le n° de l'image
mais dès que je veux l'inclure dans une macro plus rien à faire
j'utilise...
Re : Appel d'un Msgbox à l'aide de gosub
pardon oui la cellule 1 comporte la référence de l'article et les images associées prennent le nom de référence & "-2.jpg"
j'aurais put mettre en cell 40 = cell1&"-2.jpg" et remplir le tableau complètement, mais lors de l'import du fichier CSV vers le...
Re : Appel d'un Msgbox à l'aide de gosub
Essayez: Dim Img As MSForms.Image
Puis: Set Img = Me("vue" & Z)
Enfin: Img.Picture = LoadPicture(etc.
excellent je vais tester l'année prochaine
Alors en fait oui vous avez bien compris dans mon userform j'affiche les images correspondant à un article...
Re : Appel d'un Msgbox à l'aide de gosub
j'ai tenté avec un truc comme cela mais il ne comprend pas mon x qui est une variable du nom de l'obj ou plutot je lui explique mal
test:
y = 40
For Z = 2 To 9
x = "vue" & Z
Root = chemin_photo & Cells(no_ligne, y) & "-" & Z & ".jpg"
phototest...
Re : Appel d'un Msgbox à l'aide de gosub
et bien voila je te remercie c'est juste que je ne connaissais pas le if err then donc maintenant ça marche, c'est un peu lourd, il doit être possible de simplifier mon gros bloubiboulga
photo2:
vue2.Picture = LoadPicture()
If...
Re : Appel d'un Msgbox à l'aide de gosub
Pardon alors non je suis dans un userform, je reformule ma question autrement, je veux savoir si il existerait un moyen simple de tester si l'image que je tente de charger avec vue2.Picture = LoadPicture(Chem_nom2) du genre si l'image existe alors...
Re : Appel d'un Msgbox à l'aide de gosub
ben en fait le plus simple serait de savoir comment tester si l'image est présente ou non pour l'instant c'est le on error goto qui me fait ce test à défaut de connaitre une autre solution. Je fait avec ce que j'ai, c'est à dire pas grand chose, je...
Salut a vous tous, et oui je reviens encore avec un souchi
voila mon problème
photo2:
vue2.Picture = LoadPicture()
If Cells(no_ligne, 40) = "" Then
On Error GoTo photo3
vue2.Picture = LoadPicture(Chem_nom2)
Cells(no_ligne, 40) = Cells(no_ligne...
Alors un truc tous simple;)
j'ai un énorme tableau et cela sur plusieurs feuille
j'ai créer un userform qui modifie selon les entrées des cellules dans ce tableau
jusque la tout va très bien Mais pour entrer certaines données dans le userform
je doit connaitre les valeurs d'autres cellules...
Re : Je sais je débute =SI(ESTNA(RECHERCHEV <%) §*(
Oui cela fonctionne, mais en remplaçant simplement la , par un . avec rechercher, remplacer cela fonctionne également.
Mais le but c'est de transformer un fichier CSV avec plein de colonne dans ce genre avec une macro.
Pas avec la fonction...
Re : Comparaison de deux feuilles excel
Voila, a l'instant j'apprend que ma formule est vétuste et sort directe de la grotte voici donc la nouvelle version
=SIERREUR(RECHERCHEV(A1;'Feuil2'!A:H;2;0);"")
Re : Je sais je débute =SI(ESTNA(RECHERCHEV <%) §*(
Ca tombe bien quelqu'un qui me par de valeur en texte, j'en ai plein des comme ça mais ici c'est pas ça
par contre si tu veux bien te prendre la peine de regarder le fichier ci joint, tu pourra peut etre m'expliquer
pourquoi ma macro...
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.