Passage de XL2003 à 2007

Question

Bonjour à tous... je suis un petit nouveau ... Je réalisé un programme sous VB 6.3 mais j'ai un problème au passage de version d'EXCEL 2003 à 2007, car ma macro ne fonctionne pas correctement sous 2007. En effet, l'affichage ne ce fait pas correctement, c'est à dire les images (.tif) de pages de texte scannées que je viens charger (d'un autre répertoire) ne se positionnent pas page après page sous 2007 comme la macro sous 2003 le fait exécuter ! Pourriez vous m'aider à trouver l'erreur pour que le programme fonctionne sous XL 2007 Merci d'avance... Amités Voici le programme : For k = 1 To 6 DataLois = 18 + k Page = Range(("H") & DataLois).Value NumPhoto = Range(("D") & DataLois).Value If k <> 6 And NumPhoto <> 0 Then _ 'Affichage des Pages For i = 1 To Page NbPage = NbPage + 1 PE = PE + 56 Range(("A") & PE).Select FichierAImporter = Sheets("Chemin Vie").Range("PréfixePhotoLoi") & NumPhoto & "_" & i & Sheets("Chemin Vie").Range("SuffixeNomPhoto") ActiveSheet.Pictures.Insert(Sheets("Chemin Vie").Range("RépertoireLoi") & "" & FichierAImporter).Select Next i End If Eric

us_30 · Answer

Bonsoir,

Bizarre... J'ai pas Off 2007 pour tester, mais je ne vois pas de raison qui empêche le bon fonctionnement, sauf peut-être les plages nommées, en guise de piste. Sont-elles bien toujours présentes et les mêmes ... ?

Amicalement
Us.

cs_EricFa · Answer

Merci de la piste

A priori le problème survient sur la ligne de code : Range(("A") & PE).Select
Comme si le programme ne reconnaissait pas l'instruction !

Amitiés

Eric

us_30 · Answer

En général, on écrit l'instruction sans les parenthèses, mais cela ne devrait pas vraiment changer le problème.
Range("A" & PE).select
Est-ce que PE à une valeur valide ? (et est-ce que PE est bien variable string et non numérique...)

Amicalement,
Us.

cs_EricFa · Answer

J'utilise PE comme une variable numérique sous 2003. Peut-être est-ce le problème sous 2007 ?

Amicalement

Eric

us_30 · Answer

Il suffit de faire des tests, pour voir si c'est cela le problème...
La fonction Cstr(nombre) converti en string un nb...

A voir...

Amicalement,
Us.

Passage de XL2003 à 2007

5 réponses

Votre réponse

Discussions similaires