Execution de code dans classeur actif PB

cs_valer Messages postés 140 Date d'inscription mercredi 26 mai 2004 Statut Membre Dernière intervention 26 juillet 2004 - 8 juil. 2004 à 08:55
cs_valer Messages postés 140 Date d'inscription mercredi 26 mai 2004 Statut Membre Dernière intervention 26 juillet 2004 - 8 juil. 2004 à 10:24
bonjour, voila le pb, dans un prog j'ouvre des fichiers excel.
LE pb c'est que meme si qd j'ouvre un fichier donc qu'il devient acif et bien vba n'execute pas la suite des operations sur le classeur que je vien d'ouvrir mais sur le premier dont j'ai rien a faire puisque mes lignes de codes sont destinées aux classeurs que je vien d'ouvrir voici le debut de mon code:

Dim  nomtapé, a As String

Dim i As Integer

On Error Resume Next

For i = 0 To 20
nomtapé = Range("A1").Offset(i).Value
Workbooks.Open ("c:\my music\stage\devis" & nomtapé)
Workbooks(nomtapé).Activate
If Err.Number > 0 Then
'MsgBox (nomtapé & " ne peut pas etre ouvert !")
Err.Clear
Else
ActiveWorkbook.Sheets("feuil1").Select
'Mon code a executer POUR le classeur OUVERT au dessus
end if
next i

svp la fo que qlq un m'aide

merci
Valer
Valer

1 réponse

cs_valer Messages postés 140 Date d'inscription mercredi 26 mai 2004 Statut Membre Dernière intervention 26 juillet 2004
8 juil. 2004 à 10:24
help please j'y arrive tjrs pas
Valer
0
Rejoignez-nous