J'utilise dans le code d'une feuille ceci :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim PressePapier As New dataobject
Set PressePapier = New dataobject
PressePapier.SetText Target
PressePapier.PutInClipboard
End Sub
Dans le code du classeur ThisWorkbook ceci :
Private Sub Workbook_Open()
Sheets("Feuil1").Select
[A1].Select
End Sub
l'erreur suivante est retournée :
Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai
un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel.C
Bonjour. As-tu vérifié que la référence "Microsoft Forms n object Library" est bien cochée ? Cordialement. Daniel
Bonjour à tout le monde,
Je vais faire encore appel à vos lumières.
J'utilise dans le code d'une feuille ceci : Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim PressePapier As New dataobject Set PressePapier = New dataobject PressePapier.SetText Target PressePapier.PutInClipboard End Sub
Dans le code du classeur ThisWorkbook ceci : Private Sub Workbook_Open() Sheets("Feuil1").Select [A1].Select End Sub
l'erreur suivante est retournée : Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Merci par avance
Michel
Bonjour.
As-tu vérifié que la référence "Microsoft Forms n object Library" est
bien cochée ?
Cordialement.
Daniel
Bonjour à tout le monde,
Je vais faire encore appel à vos lumières.
J'utilise dans le code d'une feuille ceci :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim PressePapier As New dataobject
Set PressePapier = New dataobject
PressePapier.SetText Target
PressePapier.PutInClipboard
End Sub
Dans le code du classeur ThisWorkbook ceci :
Private Sub Workbook_Open()
Sheets("Feuil1").Select
[A1].Select
End Sub
l'erreur suivante est retournée :
Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai
un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Bonjour. As-tu vérifié que la référence "Microsoft Forms n object Library" est bien cochée ? Cordialement. Daniel
Bonjour à tout le monde,
Je vais faire encore appel à vos lumières.
J'utilise dans le code d'une feuille ceci : Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim PressePapier As New dataobject Set PressePapier = New dataobject PressePapier.SetText Target PressePapier.PutInClipboard End Sub
Dans le code du classeur ThisWorkbook ceci : Private Sub Workbook_Open() Sheets("Feuil1").Select [A1].Select End Sub
l'erreur suivante est retournée : Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Merci par avance
Michel
Jacky
Bonjour,
Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003 Alt+F11 Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object Library" -- Salutations JJ
"Michel MTO" a écrit dans le message de news: hak9b3$vjj$
Bonjour à tout le monde,
Je vais faire encore appel à vos lumières.
J'utilise dans le code d'une feuille ceci : Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim PressePapier As New dataobject Set PressePapier = New dataobject PressePapier.SetText Target PressePapier.PutInClipboard End Sub
Dans le code du classeur ThisWorkbook ceci : Private Sub Workbook_Open() Sheets("Feuil1").Select [A1].Select End Sub
l'erreur suivante est retournée : Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Merci par avance
Michel
Bonjour,
Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003
Alt+F11
Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object Library"
--
Salutations
JJ
"Michel MTO" <comptabilite@olcoven.fr> a écrit dans le message de news:
hak9b3$vjj$1@aioe.org...
Bonjour à tout le monde,
Je vais faire encore appel à vos lumières.
J'utilise dans le code d'une feuille ceci :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim PressePapier As New dataobject
Set PressePapier = New dataobject
PressePapier.SetText Target
PressePapier.PutInClipboard
End Sub
Dans le code du classeur ThisWorkbook ceci :
Private Sub Workbook_Open()
Sheets("Feuil1").Select
[A1].Select
End Sub
l'erreur suivante est retournée :
Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai
un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003 Alt+F11 Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object Library" -- Salutations JJ
"Michel MTO" a écrit dans le message de news: hak9b3$vjj$
Bonjour à tout le monde,
Je vais faire encore appel à vos lumières.
J'utilise dans le code d'une feuille ceci : Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim PressePapier As New dataobject Set PressePapier = New dataobject PressePapier.SetText Target PressePapier.PutInClipboard End Sub
Dans le code du classeur ThisWorkbook ceci : Private Sub Workbook_Open() Sheets("Feuil1").Select [A1].Select End Sub
l'erreur suivante est retournée : Erreur de compilation : Type défini par l'utilisateur non défini
J'utilise exactement le même code dans un autre classeur (puisque j'ai fai un copier/coller du code), et là ça fonctionne parfaitement.
Je n'y comprend rien.
Quelqu'un a t il une explication, que dois je faire ?
Merci par avance
Michel
Michel MTO
"Microsoft Forms n object Library" était bien coché par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le même code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'était pas coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" a écrit dans le message de news:%23Yxyrj$
Bonjour,
>Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003 Alt+F11 Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object
Library"
-- Salutations JJ
"Michel MTO" a écrit dans le message de news: hak9b3$vjj$ > Bonjour à tout le monde, > > Je vais faire encore appel à vos lumières. > > J'utilise dans le code d'une feuille ceci : > Private Sub Worksheet_SelectionChange(ByVal Target As Range) > Dim PressePapier As New dataobject > Set PressePapier = New dataobject > PressePapier.SetText Target > PressePapier.PutInClipboard > End Sub > > Dans le code du classeur ThisWorkbook ceci : > Private Sub Workbook_Open() > Sheets("Feuil1").Select > [A1].Select > End Sub > > l'erreur suivante est retournée : > Erreur de compilation : Type défini par l'utilisateur non défini > > J'utilise exactement le même code dans un autre classeur (puisque j'ai
fai
> un copier/coller du code), et là ça fonctionne parfaitement. > > Je n'y comprend rien. > > Quelqu'un a t il une explication, que dois je faire ? > > Merci par avance > > Michel > >
"Microsoft Forms n object Library" était bien coché
par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le même
code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'était pas
coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" <Dupond@marcel.fr> a écrit dans le message de
news:%23Yxyrj$RKHA.4048@TK2MSFTNGP05.phx.gbl...
Bonjour,
>Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003
Alt+F11
Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object
Library"
--
Salutations
JJ
"Michel MTO" <comptabilite@olcoven.fr> a écrit dans le message de news:
hak9b3$vjj$1@aioe.org...
> Bonjour à tout le monde,
>
> Je vais faire encore appel à vos lumières.
>
> J'utilise dans le code d'une feuille ceci :
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Dim PressePapier As New dataobject
> Set PressePapier = New dataobject
> PressePapier.SetText Target
> PressePapier.PutInClipboard
> End Sub
>
> Dans le code du classeur ThisWorkbook ceci :
> Private Sub Workbook_Open()
> Sheets("Feuil1").Select
> [A1].Select
> End Sub
>
> l'erreur suivante est retournée :
> Erreur de compilation : Type défini par l'utilisateur non défini
>
> J'utilise exactement le même code dans un autre classeur (puisque j'ai
fai
> un copier/coller du code), et là ça fonctionne parfaitement.
>
> Je n'y comprend rien.
>
> Quelqu'un a t il une explication, que dois je faire ?
>
> Merci par avance
>
> Michel
>
>
"Microsoft Forms n object Library" était bien coché par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le même code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'était pas coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" a écrit dans le message de news:%23Yxyrj$
Bonjour,
>Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003 Alt+F11 Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object
Library"
-- Salutations JJ
"Michel MTO" a écrit dans le message de news: hak9b3$vjj$ > Bonjour à tout le monde, > > Je vais faire encore appel à vos lumières. > > J'utilise dans le code d'une feuille ceci : > Private Sub Worksheet_SelectionChange(ByVal Target As Range) > Dim PressePapier As New dataobject > Set PressePapier = New dataobject > PressePapier.SetText Target > PressePapier.PutInClipboard > End Sub > > Dans le code du classeur ThisWorkbook ceci : > Private Sub Workbook_Open() > Sheets("Feuil1").Select > [A1].Select > End Sub > > l'erreur suivante est retournée : > Erreur de compilation : Type défini par l'utilisateur non défini > > J'utilise exactement le même code dans un autre classeur (puisque j'ai
fai
> un copier/coller du code), et là ça fonctionne parfaitement. > > Je n'y comprend rien. > > Quelqu'un a t il une explication, que dois je faire ? > > Merci par avance > > Michel > >
LSteph
Bonjour,
..pourquoi avec mon autre classeur
peut-être une autre bibli qui gèrerait cela le serait, je ne sais pas vraiment...
Il m'est néanmoins permis de confirmer que chez moi cela semble incontournable quand au résultat (même erreur si c'est pas coché) sur n'importe que l classeur.
Cordialement.
-- lSteph
On 8 oct, 12:14, "Michel MTO" wrote:
"Microsoft Forms n object Library" était bien coché par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le m ême code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'étai t pas coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" a écrit dans le message denews:%23Yxyrj$RKHA
> Bonjour,
> >Erreur de compilation : Type défini par l'utilisateur non défini
> "Michel MTO" a écrit dans le message de new s: > hak9b3$ > > Bonjour à tout le monde,
> > Je vais faire encore appel à vos lumières.
> > J'utilise dans le code d'une feuille ceci : > > Private Sub Worksheet_SelectionChange(ByVal Target As Range) > > Dim PressePapier As New dataobject > > Set PressePapier = New dataobject > > PressePapier.SetText Target > > PressePapier.PutInClipboard > > End Sub
> > Dans le code du classeur ThisWorkbook ceci : > > Private Sub Workbook_Open() > > Sheets("Feuil1").Select > > [A1].Select > > End Sub
> > l'erreur suivante est retournée : > > Erreur de compilation : Type défini par l'utilisateur non défini
> > J'utilise exactement le même code dans un autre classeur (puisque j 'ai fai > > un copier/coller du code), et là ça fonctionne parfaitement.
> > Je n'y comprend rien.
> > Quelqu'un a t il une explication, que dois je faire ?
> > Merci par avance
> > Michel- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Bonjour,
..pourquoi avec mon autre classeur
peut-être une autre bibli qui gèrerait cela le serait, je ne sais pas
vraiment...
Il m'est néanmoins permis de confirmer que chez moi cela semble
incontournable
quand au résultat (même erreur si c'est pas coché) sur n'importe que l
classeur.
Cordialement.
--
lSteph
On 8 oct, 12:14, "Michel MTO" <comptabil...@olcoven.fr> wrote:
"Microsoft Forms n object Library" était bien coché
par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le m ême
code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'étai t pas
coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" <Dup...@marcel.fr> a écrit dans le message denews:%23Yxyrj$RKHA .4048@TK2MSFTNGP05.phx.gbl...
> Bonjour,
> >Erreur de compilation : Type défini par l'utilisateur non défini
> "Michel MTO" <comptabil...@olcoven.fr> a écrit dans le message de new s:
> hak9b3$vj...@aioe.org...
> > Bonjour à tout le monde,
> > Je vais faire encore appel à vos lumières.
> > J'utilise dans le code d'une feuille ceci :
> > Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> > Dim PressePapier As New dataobject
> > Set PressePapier = New dataobject
> > PressePapier.SetText Target
> > PressePapier.PutInClipboard
> > End Sub
> > Dans le code du classeur ThisWorkbook ceci :
> > Private Sub Workbook_Open()
> > Sheets("Feuil1").Select
> > [A1].Select
> > End Sub
> > l'erreur suivante est retournée :
> > Erreur de compilation : Type défini par l'utilisateur non défini
> > J'utilise exactement le même code dans un autre classeur (puisque j 'ai
fai
> > un copier/coller du code), et là ça fonctionne parfaitement.
> > Je n'y comprend rien.
> > Quelqu'un a t il une explication, que dois je faire ?
> > Merci par avance
> > Michel- Masquer le texte des messages précédents -
peut-être une autre bibli qui gèrerait cela le serait, je ne sais pas vraiment...
Il m'est néanmoins permis de confirmer que chez moi cela semble incontournable quand au résultat (même erreur si c'est pas coché) sur n'importe que l classeur.
Cordialement.
-- lSteph
On 8 oct, 12:14, "Michel MTO" wrote:
"Microsoft Forms n object Library" était bien coché par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le m ême code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'étai t pas coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" a écrit dans le message denews:%23Yxyrj$RKHA
> Bonjour,
> >Erreur de compilation : Type défini par l'utilisateur non défini
> "Michel MTO" a écrit dans le message de new s: > hak9b3$ > > Bonjour à tout le monde,
> > Je vais faire encore appel à vos lumières.
> > J'utilise dans le code d'une feuille ceci : > > Private Sub Worksheet_SelectionChange(ByVal Target As Range) > > Dim PressePapier As New dataobject > > Set PressePapier = New dataobject > > PressePapier.SetText Target > > PressePapier.PutInClipboard > > End Sub
> > Dans le code du classeur ThisWorkbook ceci : > > Private Sub Workbook_Open() > > Sheets("Feuil1").Select > > [A1].Select > > End Sub
> > l'erreur suivante est retournée : > > Erreur de compilation : Type défini par l'utilisateur non défini
> > J'utilise exactement le même code dans un autre classeur (puisque j 'ai fai > > un copier/coller du code), et là ça fonctionne parfaitement.
> > Je n'y comprend rien.
> > Quelqu'un a t il une explication, que dois je faire ?
> > Merci par avance
> > Michel- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
michdenis
Lorsque tu ajoutes un formulaire (userform) cette bibliothèque se charge d'elle-même avec l'insertion du formulaire. En conséquence tu ne l'as peut être pas ajouté manuellement, mais elle devait être présente.
"Michel MTO" a écrit dans le message de groupe de discussion : hakdt2$6cg$ "Microsoft Forms n object Library" était bien coché par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le même code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'était pas coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" a écrit dans le message de news:%23Yxyrj$
Bonjour,
>Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003 Alt+F11 Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object
Library"
-- Salutations JJ
"Michel MTO" a écrit dans le message de news: hak9b3$vjj$ > Bonjour à tout le monde, > > Je vais faire encore appel à vos lumières. > > J'utilise dans le code d'une feuille ceci : > Private Sub Worksheet_SelectionChange(ByVal Target As Range) > Dim PressePapier As New dataobject > Set PressePapier = New dataobject > PressePapier.SetText Target > PressePapier.PutInClipboard > End Sub > > Dans le code du classeur ThisWorkbook ceci : > Private Sub Workbook_Open() > Sheets("Feuil1").Select > [A1].Select > End Sub > > l'erreur suivante est retournée : > Erreur de compilation : Type défini par l'utilisateur non défini > > J'utilise exactement le même code dans un autre classeur (puisque j'ai
fai
> un copier/coller du code), et là ça fonctionne parfaitement. > > Je n'y comprend rien. > > Quelqu'un a t il une explication, que dois je faire ? > > Merci par avance > > Michel > >
Lorsque tu ajoutes un formulaire (userform) cette bibliothèque
se charge d'elle-même avec l'insertion du formulaire. En conséquence
tu ne l'as peut être pas ajouté manuellement, mais elle devait être
présente.
"Michel MTO" <comptabilite@olcoven.fr> a écrit dans le message de groupe de discussion :
hakdt2$6cg$1@aioe.org...
"Microsoft Forms n object Library" était bien coché
par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le même
code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'était pas
coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" <Dupond@marcel.fr> a écrit dans le message de
news:%23Yxyrj$RKHA.4048@TK2MSFTNGP05.phx.gbl...
Bonjour,
>Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003
Alt+F11
Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object
Library"
--
Salutations
JJ
"Michel MTO" <comptabilite@olcoven.fr> a écrit dans le message de news:
hak9b3$vjj$1@aioe.org...
> Bonjour à tout le monde,
>
> Je vais faire encore appel à vos lumières.
>
> J'utilise dans le code d'une feuille ceci :
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Dim PressePapier As New dataobject
> Set PressePapier = New dataobject
> PressePapier.SetText Target
> PressePapier.PutInClipboard
> End Sub
>
> Dans le code du classeur ThisWorkbook ceci :
> Private Sub Workbook_Open()
> Sheets("Feuil1").Select
> [A1].Select
> End Sub
>
> l'erreur suivante est retournée :
> Erreur de compilation : Type défini par l'utilisateur non défini
>
> J'utilise exactement le même code dans un autre classeur (puisque j'ai
fai
> un copier/coller du code), et là ça fonctionne parfaitement.
>
> Je n'y comprend rien.
>
> Quelqu'un a t il une explication, que dois je faire ?
>
> Merci par avance
>
> Michel
>
>
Lorsque tu ajoutes un formulaire (userform) cette bibliothèque se charge d'elle-même avec l'insertion du formulaire. En conséquence tu ne l'as peut être pas ajouté manuellement, mais elle devait être présente.
"Michel MTO" a écrit dans le message de groupe de discussion : hakdt2$6cg$ "Microsoft Forms n object Library" était bien coché par contre "Microsoft Forms 2.0 Object Library" ne l'était pas.
Toujours une question en suspens : pourquoi avec mon autre classeur le même code fonctionnait alors que "Microsoft Forms 2.0 Object Library" n'était pas coché?
Enfin, merci à tous les 2, Daniel et Jacky
Michel
"Jacky" a écrit dans le message de news:%23Yxyrj$
Bonjour,
>Erreur de compilation : Type défini par l'utilisateur non défini
XL 2003 Alt+F11 Menu / outils / références...==>cocher "Microsoft Forms 2.0 Object
Library"
-- Salutations JJ
"Michel MTO" a écrit dans le message de news: hak9b3$vjj$ > Bonjour à tout le monde, > > Je vais faire encore appel à vos lumières. > > J'utilise dans le code d'une feuille ceci : > Private Sub Worksheet_SelectionChange(ByVal Target As Range) > Dim PressePapier As New dataobject > Set PressePapier = New dataobject > PressePapier.SetText Target > PressePapier.PutInClipboard > End Sub > > Dans le code du classeur ThisWorkbook ceci : > Private Sub Workbook_Open() > Sheets("Feuil1").Select > [A1].Select > End Sub > > l'erreur suivante est retournée : > Erreur de compilation : Type défini par l'utilisateur non défini > > J'utilise exactement le même code dans un autre classeur (puisque j'ai
fai
> un copier/coller du code), et là ça fonctionne parfaitement. > > Je n'y comprend rien. > > Quelqu'un a t il une explication, que dois je faire ? > > Merci par avance > > Michel > >