"L'indice n'appartient à la sélection" + VBA

Résolu/Fermé
TraderAS
Messages postés
110
Date d'inscription
lundi 3 décembre 2012
Statut
Membre
Dernière intervention
26 avril 2018
- 2 avril 2013 à 16:35
TraderAS
Messages postés
110
Date d'inscription
lundi 3 décembre 2012
Statut
Membre
Dernière intervention
26 avril 2018
- 2 avril 2013 à 18:07
Bonjour,

j'ai lu beaucoup de choses sur cette erreur mais je n'ai pas trouvé de solution,

en faite j'ai lu cette solution et ca na pas marché:
https://forums.commentcamarche.net/forum/affich-22912711-erreur-d-execution-13-incompatibilite-de-type

j'ai essayé :
Sub DBcOPY()

FichD = ActiveWorkbook.Name
Dim FichCore As Workbook
Set FichCore = Workbooks("Daily.xlsm.xlsm")
Dim Sh1 As Worksheet
Set Sh1 = Sheets("Technical")
Dim Sh2 As Worksheet
Set Sh2 = Sheets("DB")

mais ca ne marche toujours pas avec
Dim Sh1 As Worksheet
Set Sh1 = Sheets("Technical")

et avec
Dim Sh1 As Worksheet
Set Sh1 = workSheets("Technical")

malgré que dans le fichier, c'est bien et bien la feuille ("Technical")
merci
A voir également:

7 réponses

f894009
Messages postés
16647
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
16 août 2022
1 648
2 avril 2013 à 16:53
Bonjour,


Set FichCore = Workbooks("Daily.xlsm.xlsm") est vous sur du nom du classeur???
0