Problème vba excel et import de fichier

  • Initiateur de la discussion Initiateur de la discussion jpr93
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jpr93

XLDnaute Nouveau
Bonjour,

je suis completement novice en programmation vba et on me demande resoudre un problème d'import de fichier excel.
voici le code
Private Sub CmdValider_Click()
DlgChoix.hide
If DlgChoix.new_etude Then
Msg = "Vous avez choisi de faire une nouvelle étude."
Style = vbValiderOnly + vbInformation
Title = "Activité Commerciale - MPrévoyance - Février 2010"
Response = MsgBox(Msg, Style, Title)
Else
Msg = "Vous avez choisi d'importer une ancienne étude."
Style = vbValiderOnly + vbInformation
Title = "Activité Commerciale - MPrévoyance - Février 2010"
Response = MsgBox(Msg, Style, Title)
NOMFICHIER = ActiveWorkbook.Name

Dim Dossier As FileDialog
Dim Chemin As String

Set Dossier = Application.FileDialog(msoFileDialogOpen)
Dossier.Show
Dossier.Execute

Sheets("Export").Copy Before:=Workbooks(NOMFICHIER).Sheets(6)

Call Import

Sheets("export (2)").Visible = True
Sheets("export (2)").Select
ActiveWindow.SelectedSheets.Delete

Infos.Show
End If
Infos.Show
End Sub

quand je lance le code tout va bien jusqu'à la sélection du fichier à importer, ensuite j'ai le message d'erreur suivant :

Erreur d'excécution '1004'

Excel ne parvient pas à insérer les feuilles dans le classeur de destination car il contient moins de lignes et de colonnes que le classeur source....

Merci pour votre aide.
 
Re : Problème vba excel et import de fichier

Bonjour ByunoM45,

en tripatouillant un peu, et suite à ta demande de précision, je pense que le problème vient d'excel qui ne reconnait pas les fichiers autres qu'excel 1997-2003. Les fichiers ayant été enregistrés en excel 2007.
je te remercie de ton aide.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
1
Affichages
913
Réponses
1
Affichages
1 K
Compte Supprimé 979
C
Retour