Erreur d exec 13
samsoung
-
Patrice33740 Messages postés 8930 Statut Membre -
Patrice33740 Messages postés 8930 Statut Membre -
Bonjour,
j ai un souci
il y a quelque jour j avais creer ce code vba dans un module et ca fonctionnait et depuis il ne veux plus rien savoir je vais craquer lol
le code :
sheets("feuil1").range("A1").value=sheets("feuil1").range('A1").value+1
A1 = F5003001 ce qui donnait apres le lancement de la macro
A1 = F5003002
et la ca ne fonctionne plus et ca marque erreur d execu '13
quelqu un pourrait il m aider
j ai un souci
il y a quelque jour j avais creer ce code vba dans un module et ca fonctionnait et depuis il ne veux plus rien savoir je vais craquer lol
le code :
sheets("feuil1").range("A1").value=sheets("feuil1").range('A1").value+1
A1 = F5003001 ce qui donnait apres le lancement de la macro
A1 = F5003002
et la ca ne fonctionne plus et ca marque erreur d execu '13
quelqu un pourrait il m aider
Configuration: Windows / Chrome 80.0.3987.132
A voir également:
- Erreur d exec 13
- Fifa 13 - Télécharger - Jeux vidéo
- Test redmi note 13 5g - Accueil - Téléphones
- Erreur 0x80070643 - Accueil - Windows
- Erreur 4201 france tv ✓ - Forum Réseaux sociaux
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
2 réponses
Bonjour,
Vérifiez que le nom de l'onglet est bien feuil1 (sans espace avant, après, et avec les minuscule, majuscule)
Vérifiez que vous avez bien mis un apostrophe entre les range("A1").value
Sinon, placez votre classeur sans données confidentielles
Allez dans https://www.cjoint.com/
Cliquez sur "PARCOURIR" pour sélectionner le classeur
Clic le bouton "CREER LE LIEN"
Clic droit quand le lien est créé "COPIER LE LIEN"
Sur le post Clic droit "Coller".
ou dans https://mon-partage.fr/
Vérifiez que le nom de l'onglet est bien feuil1 (sans espace avant, après, et avec les minuscule, majuscule)
Vérifiez que vous avez bien mis un apostrophe entre les range("A1").value
Sinon, placez votre classeur sans données confidentielles
Allez dans https://www.cjoint.com/
Cliquez sur "PARCOURIR" pour sélectionner le classeur
Clic le bouton "CREER LE LIEN"
Clic droit quand le lien est créé "COPIER LE LIEN"
Sur le post Clic droit "Coller".
ou dans https://mon-partage.fr/
Bonjour,
Si ce code fonctionnait avant c'est qu'il n'y avait pas le F au début du numéro !
Si tu l'enlève, le code refonctionnera (en remplaçant le ' avant A1 par ")
Et si tu veux une lettre au début de ton numéro alors :
Si ce code fonctionnait avant c'est qu'il n'y avait pas le F au début du numéro !
Si tu l'enlève, le code refonctionnera (en remplaçant le ' avant A1 par ")
Et si tu veux une lettre au début de ton numéro alors :
Sub xxx()
Dim p As String ' prefixe
Dim n As Long ' numéro
p = Left(Worksheets("feuil1").Range("A1").Text, 1)
n = Val(Mid(Worksheets("feuil1").Range("A1").Text, 2))
Worksheets("feuil1").Range("A1").Value = p & Format(n + 1, "0000000")
End Sub
