ERREUR Split() exécution '13'
Résolu
Stephfun
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention -
cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour à tous,
J'ai un problème simple et qui semble récurrent : Erreur d'exécution 13.
J'ai bien compris qu'il s'agissait sans doute d'une mauvaise déclaration ou utilisation de variable mais même en bidouillant ça ne marche pas toujours. (Cette ligne de code fonctionne une fois sur trois...).
- rng me retourne " $A$1:$P$3 "
- Même en utilisant seulement Split(Sheets("ST").UsedRange.Address, "$") j'ai cette erreur
- Même avec Dim rng() As String ; Dim rng As Variant ; Dim rng() As Variant ...
Je ne sais plus comment résoudre ce soucis.
Merci de bien vouloir m'aider/guider
Stephfun
J'ai un problème simple et qui semble récurrent : Erreur d'exécution 13.
J'ai bien compris qu'il s'agissait sans doute d'une mauvaise déclaration ou utilisation de variable mais même en bidouillant ça ne marche pas toujours. (Cette ligne de code fonctionne une fois sur trois...).
Dim rng As String
rng = ThisWorkbook.Sheets("ST").UsedRange.Address
MsgBox (Split(rng, "$")(4))
- rng me retourne " $A$1:$P$3 "
- Même en utilisant seulement Split(Sheets("ST").UsedRange.Address, "$") j'ai cette erreur
- Même avec Dim rng() As String ; Dim rng As Variant ; Dim rng() As Variant ...
Je ne sais plus comment résoudre ce soucis.
Merci de bien vouloir m'aider/guider
Stephfun
A voir également:
- ERREUR Split() exécution '13'
- Split cam - Télécharger - Messagerie
- Fifa 13 - Télécharger - Jeux vidéo
- Test redmi note 13 5g - Accueil - Téléphones
- Erreur 0x80070643 - Accueil - Windows
- Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
2 réponses
Bonjour,
essai ceci:
voir exemple ici:
https://www.developpez.net/forums/d605223/logiciels/microsoft-office/excel/contribuez/boucles-parcourir-colonne-ligne-plage-donnees-2-methodes/
essai ceci:
Dim rng As Long
rng = Split(ThisWorkbook.Sheets("Feuil1").UsedRange.Address, "$")(4)
MsgBox rng
voir exemple ici:
https://www.developpez.net/forums/d605223/logiciels/microsoft-office/excel/contribuez/boucles-parcourir-colonne-ligne-plage-donnees-2-methodes/
Merci pour la réponse.
C'est compliqué de dire si cela fonctionne bien ou non puisque l'erreur apparaît une fois sur trois voire pas du tout pendant quelques jours parfois. J'ai quand même constaté un lien entre le fait que d'autres fenêtres Excel étaient ouvertes et l'erreur (bien que ce soit vrai, cela n'expliquerait pas l'erreur 13).
Dans ce cas je précise le Workbook mais je peux pas faire grand chose de plus. Je classe le sujet en Résolu bien qu'il n'y ait pas vraiment de solution (ni de problème d'ailleurs).
Encore merci.
Stephfun
C'est compliqué de dire si cela fonctionne bien ou non puisque l'erreur apparaît une fois sur trois voire pas du tout pendant quelques jours parfois. J'ai quand même constaté un lien entre le fait que d'autres fenêtres Excel étaient ouvertes et l'erreur (bien que ce soit vrai, cela n'expliquerait pas l'erreur 13).
Dans ce cas je précise le Workbook mais je peux pas faire grand chose de plus. Je classe le sujet en Résolu bien qu'il n'y ait pas vraiment de solution (ni de problème d'ailleurs).
Encore merci.
Stephfun
Vu que cette ligne de code sert à trouvé la ligne de la dernière cellule utilisée, voir ceci pour remplacer
https://excel-malin.com/tutoriels/vba-tutoriels/vba-trouver-la-derniere-cellule-utilisee/
@+ Le Pivert
https://excel-malin.com/tutoriels/vba-tutoriels/vba-trouver-la-derniere-cellule-utilisee/
@+ Le Pivert
