Juillet 2013 : A l'occasion du 10eme anniversaire de VeriTi, j'ai décide de réparer et de remettre en ligne le site, avec une nouvelle version plus structurée tout en gardant les mêmes fichiers Excel
Objet : Re : Un coup de main par Fhoest sur 17/12/2013 10:45:01
Bonjour, d'après ce que j'ai pu voir et comprendre. il faut mettre
if photo1<>"" then
les trois lignes de code
end if
if photo2<>"" then
les trois lignes de code
end if
etc... ceci dit tu utilises beaucoup trop les select et ça ralenti énormément le code, pour ce que tu fais ce n'ai pas bien grave car il n'y a pas beaucoup de données. essaye d'enlever les select et de mettre une incrémentation de colonnes dans l'offset c'est à dire Activecell.offset(0,1) = ... Activecell.offset(0,2)= ... tu gagneras en nombres de ligne et en rapidité d'exécution de code.