OVH Cloud OVH Cloud

Module de classe

19 réponses
Avatar
garnote
Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge

9 réponses

1 2
Avatar
Misange
Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC d'un
petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:
Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:

C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont fait


sous

Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$

Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:

Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai fait.
ça te va ?




http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm





"garnote" a écrit dans le message de
news:6IvNc.110071$

Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge


















Avatar
twinley
Oui, sauvons garnote !
Mobilisez vous...
En cas de reprise d'anciens fichiers de sauvegarde, c'est mieux d'avoir
l'antivirus en action.

Bon courage.
Ma proposition de t'envoyer un exe qui chasse un seul virus tiens toujours
si tu me donnes ton mail.

--
à+twinley
"Misange" a écrit dans le message de
news:
Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC d'un
petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:
Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:

C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont fait


sous

Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$

Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:

Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai fait.
ça te va ?







http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm





"garnote" a écrit dans le message de
news:6IvNc.110071$

Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge




















Avatar
garnote
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%
Oui, sauvons garnote !
Mobilisez vous...
En cas de reprise d'anciens fichiers de sauvegarde, c'est mieux d'avoir
l'antivirus en action.

Bon courage.
Ma proposition de t'envoyer un exe qui chasse un seul virus tiens toujours
si tu me donnes ton mail.

--
à+twinley
"Misange" a écrit dans le message de
news:
Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC d'un
petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:
Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:

C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont
fait





sous

Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$

Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:

Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai fait.
ça te va ?










http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm




"garnote" a écrit dans le message de
news:6IvNc.110071$

Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge
























Avatar
garnote
Ça c'est gentil :-)

Voici mon adresse :
holanote@
globetrotter.net

En espérant que mon caca d'ordi puisse ouvrir le fichier joint.

Merci

Serge


"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%
Oui, sauvons garnote !
Mobilisez vous...
En cas de reprise d'anciens fichiers de sauvegarde, c'est mieux d'avoir
l'antivirus en action.

Bon courage.
Ma proposition de t'envoyer un exe qui chasse un seul virus tiens toujours
si tu me donnes ton mail.

--
à+twinley
"Misange" a écrit dans le message de
news:
Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC d'un
petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:
Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:

C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont
fait





sous

Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$

Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:

Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai fait.
ça te va ?










http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm




"garnote" a écrit dans le message de
news:6IvNc.110071$

Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge
























Avatar
Shnoulle
Pour twinley,

éventuellemnt renomme stinger.exe en alancer.exe

peut étre que le virus va bloquer stinger et peut 'éventuellemnt' tester
le nom de l'appli à lancer.

(quelquefois les grosse m... qui nous font c... sont relatvement facile
à contourner)

A+



garnote wrote:
Ça c'est gentil :-)

Voici mon adresse :
holanote@
globetrotter.net

En espérant que mon caca d'ordi puisse ouvrir le fichier joint.

Merci

Serge


"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%

Oui, sauvons garnote !
Mobilisez vous...
En cas de reprise d'anciens fichiers de sauvegarde, c'est mieux d'avoir
l'antivirus en action.

Bon courage.
Ma proposition de t'envoyer un exe qui chasse un seul virus tiens toujours
si tu me donnes ton mail.

--
à+twinley
"Misange" a écrit dans le message de
news:

Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC d'un
petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:

Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:


C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont





fait

sous


Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$


Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:


Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai fait.
ça te va ?




http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm







"garnote" a écrit dans le message de
news:6IvNc.110071$


Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge
























Avatar
twinley
c'est parti

--
à+twinley
"garnote" a écrit dans le message de
news:LT8Oc.137607$
Ça c'est gentil :-)

Voici mon adresse :
holanote@
globetrotter.net

En espérant que mon caca d'ordi puisse ouvrir le fichier joint.

Merci

Serge


"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%
Oui, sauvons garnote !
Mobilisez vous...
En cas de reprise d'anciens fichiers de sauvegarde, c'est mieux d'avoir
l'antivirus en action.

Bon courage.
Ma proposition de t'envoyer un exe qui chasse un seul virus tiens
toujours


si tu me donnes ton mail.

--
à+twinley
"Misange" a écrit dans le message de
news:
Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC
d'un



petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:
Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:

C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont
fait





sous

Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$

Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:

Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai
fait.







ça te va ?












http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm




"garnote" a écrit dans le message de
news:6IvNc.110071$

Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge




























Avatar
twinley
Salut Shnoulle,
Aux dernières nouvelles c'était BugB qui s'était incrusté. J'ai donc envoyé
FixBugB.exe.
On va voir, si il a d'autres messages.
Merci pour ton astuce. Je pense comme toi, ça ne doit pas être très
virulent.
Juste une question de méthode.
à suivre...
--
à+twinley
"Shnoulle" a écrit dans le message de
news:
Pour twinley,

éventuellemnt renomme stinger.exe en alancer.exe

peut étre que le virus va bloquer stinger et peut 'éventuellemnt' tester
le nom de l'appli à lancer.

(quelquefois les grosse m... qui nous font c... sont relatvement facile
à contourner)

A+



garnote wrote:
Ça c'est gentil :-)

Voici mon adresse :
holanote@
globetrotter.net

En espérant que mon caca d'ordi puisse ouvrir le fichier joint.

Merci

Serge


"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%

Oui, sauvons garnote !
Mobilisez vous...
En cas de reprise d'anciens fichiers de sauvegarde, c'est mieux d'avoir
l'antivirus en action.

Bon courage.
Ma proposition de t'envoyer un exe qui chasse un seul virus tiens
toujours



si tu me donnes ton mail.

--
à+twinley
"Misange" a écrit dans le message de
news:

Allez Serge, ce sont les vacances pour toi non ? que dirait ton PC d'un
petit coup de formatage, réinstall propre d'XP, d'un bon antivirus en
résident ? Je suis certes pas une forcenée du formatage mais parfois,
devant une telle adversité, c'est quand même une façon assez simple de
défragmenter, de faire le ménage avant nettoyage, d'avoir les derniers
SP, dernières versions "sécurisées" de IE...
Courage !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


le 29/07/2004 15:42:

Tout déconne dans mon ordi et c'est la dernière fois
que j'embête le monde avec ça. J'irai consulter tes exemples
quand ça ira mieux.

Encore merci,
Serge


"Emcy" a écrit dans le message de
news:


C'est quoi ton soucis, c'est ton navigateur qui déconne ?
si tu veux je peux t'envoyer les exemples par mails (mais ils sont





fait

sous


Excel XP : je sais pas si ça va marcher sur ta version d'Excel)

Je peux pas t'écrire les exemples comme ça car ils n'ont aucunes
signification sans les userforms qui vont avec.

"garnote" a écrit dans le message de
news:Mp6Oc.137597$


Bonjour Emcy,

M'est avis que ça me conviendrait si je me décidais
à changer d'ordi ou à lui refaire une beauté.
Même plus capable de télécharger des documents *&?%$*%/

Merci

Serge


"Emcy" a écrit dans le message de
news:


Bonjours Garnote,

Tu trouveras peut-être ton bonneur dans ces classeurs que j'ai
fait.








ça te va ?










http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm




"garnote" a écrit dans le message de
news:6IvNc.110071$


Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge



























Avatar
docm
Voici un tout petit exemple tout simple, peut-être trop simple.

'Dans le module de classe Class1
Option Explicit

'Cette propriété publique sera une propriété des objets qui seront créés à
partir de cette classe
Public zaza As String
'Cette propriété privée sera utilisée par ce module seulement et ne sera pas
'une propriété des objets créés à partir de cette classe
Private m_zozo As Integer

'Utilisation des propriétés
Property Let zozo(ByVal vData As Integer)
m_zozo = vData
End Property

Property Get zozo() As Integer
zozo = m_zozo
End Property

'Fonction
Public Function maFonction() As String
Dim str As String
'...
maFonction = str
End Function

'Procédure
Public Sub MaSub()
'...
End Sub
'-------------------------

'Dans un module standard
Dim obj As New Class1

Sub t()
b = obj.maFonction()
Call obj.MaSub
obj.zaza = "deux"
c = obj.zaza
obj.zozo = 10 'Fait appel à Property Let
d = obj.zozo 'Fait appel à Property Get

End Sub

'--------------------------------

"garnote" wrote in message
news:6IvNc.110071$
Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge




Avatar
sabatier
en fait d'abîmes conceptuels, moi je trouve qu'on fait difficilement
mieux...et toi, serguei serguevitch zozo?
jps

"docm" a écrit dans le message de
news:
Voici un tout petit exemple tout simple, peut-être trop simple.

'Dans le module de classe Class1
Option Explicit

'Cette propriété publique sera une propriété des objets qui seront créés à
partir de cette classe
Public zaza As String
'Cette propriété privée sera utilisée par ce module seulement et ne sera
pas

'une propriété des objets créés à partir de cette classe
Private m_zozo As Integer

'Utilisation des propriétés
Property Let zozo(ByVal vData As Integer)
m_zozo = vData
End Property

Property Get zozo() As Integer
zozo = m_zozo
End Property

'Fonction
Public Function maFonction() As String
Dim str As String
'...
maFonction = str
End Function

'Procédure
Public Sub MaSub()
'...
End Sub
'-------------------------

'Dans un module standard
Dim obj As New Class1

Sub t()
b = obj.maFonction()
Call obj.MaSub
obj.zaza = "deux"
c = obj.zaza
obj.zozo = 10 'Fait appel à Property Let
d = obj.zozo 'Fait appel à Property Get

End Sub

'--------------------------------

"garnote" wrote in message
news:6IvNc.110071$
Bonsoir à tous,

Quelqu'un saurait-il me donner un exemple
expliqué de module de classe. Un tout petit
exemple pour me lancer dans ces abîmes
conceptuels !

Merci

Serge








1 2