L'indice n'appartient pas à la sélection

Snake_soldiers08 Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
Utilisateur anonyme - 2 mai 2015 à 19:59

Bonjour,
je ne sais pas pourquoi cela fait ca voici mon code

Function Calcul_droits()
montant = Form1.TextBox1.Value + Form1.TextBox2.Value
Set formule = Sheets(Feuil2.Range("A14"))
résultat = Application.WorksheetFunction.Sum(formule)
MsgBox (résultat)
End Function

A voir également:

L'indice n'appartient pas à la sélection
A qui appartient ce numéro - Guide
Indice téléphonique - Guide
Forum Mobile
Forum Mail
Forum Access

6 réponses

Réponse 1 / 6

NHenry Messages postés 15215 Date d'inscription Statut Modérateur Dernière intervention 363

Dans ce genre de cas, préciser la ligne qui génère l'erreur est bien ...

Je suppose que c'est :

Sheets(Feuil2.Range("A14"))

En gros, le nom de la feuille n'existe pas.

J'interviens principalement en VB6 et VB.NET, avec un peu de C#, mais la modération m'amène souvent sur d'autre langages.
En VB.NET pensez à activer "Option Explicit" et "Option Strict"

Réponse 2 / 6

thev Messages postés 1972 Date d'inscription Statut Membre Dernière intervention 709

Set formule = Sheets("Feuil2").Range("A14")

Réponse 3 / 6

Snake_soldiers08 Messages postés 4 Date d'inscription Statut Membre Dernière intervention

thev j'ai changé mais toujours la meme erreur :/ henry pourtant feuil2 existe bien je le vois a coté dans mon vba project

NHenry Messages postés 15215 Date d'inscription Statut Modérateur Dernière intervention 363

Utilises un point d'arrêt et regardes le contenu des variables (Shift+F9)

Snake_soldiers08 Messages postés 4 Date d'inscription Statut Membre Dernière intervention

j'ai formule=vide

Réponse 4 / 6

thev Messages postés 1972 Date d'inscription Statut Membre Dernière intervention 709

Je viens de tester avec 500 dans la cellule A14 de Feuil2 et ça fonctionne sans problème :

Function Calcul_droits()
    montant = 100
    Set formule = Sheets("Feuil2").Range("A14")
    résultat = Application.WorksheetFunction.Sum(formule)
    MsgBox (résultat)
End Function

Snake_soldiers08 Messages postés 4 Date d'inscription Statut Membre Dernière intervention

en fait au départ j'avai une formule toute faite sur une cellule excel dans un autre classeur et le montant serait la valeur qui a dans la textbox1+ textbox2 et avec cette valeur appliquer la formule mais je ne vois pas trop comment faire

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 6

thev Messages postés 1972 Date d'inscription Statut Membre Dernière intervention 709

Le plus simple me parait être de reprendre ta formule directement dans VBA.

--

Réponse 6 / 6

Utilisateur anonyme

Bonsoir un petit rappel de la bonne utilisation des balises de code ici.

Discussions similaires

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

erreur d'execution 9, l'indice n'appartient pas à la sélection

l'indice n'appartient pas à la selection

Erreur '9' l'indice n'appartient pas à la sélection

variable workbook : l'indice n'appartient pas à la sélection

Votre réponse

Discussions similaires