Bonjour à tous, MPFEiens!
je viens d'aller faire un petit tour sur excelabo.net... pour la première
fois!
Donc j'ai fini par arrivé sur la page "code de bonne conduite sur MPFE" et
par conséquent,je tiens à m'excuser d'avoir enfreint certaines règles de
ce
code
Mais là n'est pas la question...
J'ai aujourd'hui un problème, plutôt qu'un long discours, mieux vaut la
macro en exemple:
Public Sub AddBouton()
Dim CellTS As Range
Dim Btn As Object
Dim Base, Cherch As String
For Each CellTS In Range("AY60:FV60")
Base = CellTS.Value
Cherch = "TS"
If InStr(1, Base, Cherch) <> 0 Then
CellTS.Activate
Set Btn = Feuil2.OLEObjects.Add(ClassType:="forms.commandbutton.1")
With Btn
.TopLeftCell = CellTS
.Width = 61.5
.Height = 25.5
.Caption = CellTS.Value
End With
End If
Next
End Sub
le problème se situe au niveau de la ligne Caption = CellTS.Value. ça ne
veut pas fonctionner et je n'arrive pas à trouver ce qu'il faut faire pour
ajouter un fichu nom à chacun de ces boutons.
j'ai essayé ceci (qui ne fonctionne pas)
For Each Ctrl In Controls
If TypeOf Ctrl Is MSForms.CommandButton Then
Ctrl.Caption = CellTS.Value
End If
Next
Pouvez vous m'aider?
merci et bonne journée à tous
Bonjour à tous, MPFEiens!
je viens d'aller faire un petit tour sur excelabo.net... pour la première
fois!
Donc j'ai fini par arrivé sur la page "code de bonne conduite sur MPFE" et
par conséquent,je tiens à m'excuser d'avoir enfreint certaines règles de
ce
code
Mais là n'est pas la question...
J'ai aujourd'hui un problème, plutôt qu'un long discours, mieux vaut la
macro en exemple:
Public Sub AddBouton()
Dim CellTS As Range
Dim Btn As Object
Dim Base, Cherch As String
For Each CellTS In Range("AY60:FV60")
Base = CellTS.Value
Cherch = "TS"
If InStr(1, Base, Cherch) <> 0 Then
CellTS.Activate
Set Btn = Feuil2.OLEObjects.Add(ClassType:="forms.commandbutton.1")
With Btn
.TopLeftCell = CellTS
.Width = 61.5
.Height = 25.5
.Caption = CellTS.Value
End With
End If
Next
End Sub
le problème se situe au niveau de la ligne Caption = CellTS.Value. ça ne
veut pas fonctionner et je n'arrive pas à trouver ce qu'il faut faire pour
ajouter un fichu nom à chacun de ces boutons.
j'ai essayé ceci (qui ne fonctionne pas)
For Each Ctrl In Controls
If TypeOf Ctrl Is MSForms.CommandButton Then
Ctrl.Caption = CellTS.Value
End If
Next
Pouvez vous m'aider?
merci et bonne journée à tous
Bonjour à tous, MPFEiens!
je viens d'aller faire un petit tour sur excelabo.net... pour la première
fois!
Donc j'ai fini par arrivé sur la page "code de bonne conduite sur MPFE" et
par conséquent,je tiens à m'excuser d'avoir enfreint certaines règles de
ce
code
Mais là n'est pas la question...
J'ai aujourd'hui un problème, plutôt qu'un long discours, mieux vaut la
macro en exemple:
Public Sub AddBouton()
Dim CellTS As Range
Dim Btn As Object
Dim Base, Cherch As String
For Each CellTS In Range("AY60:FV60")
Base = CellTS.Value
Cherch = "TS"
If InStr(1, Base, Cherch) <> 0 Then
CellTS.Activate
Set Btn = Feuil2.OLEObjects.Add(ClassType:="forms.commandbutton.1")
With Btn
.TopLeftCell = CellTS
.Width = 61.5
.Height = 25.5
.Caption = CellTS.Value
End With
End If
Next
End Sub
le problème se situe au niveau de la ligne Caption = CellTS.Value. ça ne
veut pas fonctionner et je n'arrive pas à trouver ce qu'il faut faire pour
ajouter un fichu nom à chacun de ces boutons.
j'ai essayé ceci (qui ne fonctionne pas)
For Each Ctrl In Controls
If TypeOf Ctrl Is MSForms.CommandButton Then
Ctrl.Caption = CellTS.Value
End If
Next
Pouvez vous m'aider?
merci et bonne journée à tous
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Bonjour Pounet95,
Et bien, si tu es rendu à la page 752, il ne t'en reste plus
que 100 à parcourir ! Tu y est presque.... ;-)
Effectivement, ce livre est très bon.
Salutations!
"Pounet95" a écrit dans le message de news:
Re,
.... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" a écrit dans le message de news:Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis
pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Bonjour Pounet95,
Et bien, si tu es rendu à la page 752, il ne t'en reste plus
que 100 à parcourir ! Tu y est presque.... ;-)
Effectivement, ce livre est très bon.
Salutations!
"Pounet95" <pasdepub@oneado.fr> a écrit dans le message de news:
e6fn3VPIGHA.3700@TK2MSFTNGP15.phx.gbl...
Re,
.... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" <mike2050@caramail.com> a écrit dans le message de news:
1B7D2327-61DD-484A-BE85-5AE54B10D87A@microsoft.com...
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis
pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Bonjour Pounet95,
Et bien, si tu es rendu à la page 752, il ne t'en reste plus
que 100 à parcourir ! Tu y est presque.... ;-)
Effectivement, ce livre est très bon.
Salutations!
"Pounet95" a écrit dans le message de news:
Re,
.... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" a écrit dans le message de news:Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis
pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Bonjour Pounet95,
Et bien, si tu es rendu à la page 752, il ne t'en reste plus
que 100 à parcourir ! Tu y est presque.... ;-)
Effectivement, ce livre est très bon.
Salutations!
"Pounet95" a écrit dans le message de news:
Re,
.... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" a écrit dans le message de news:Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis
pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Bonjour Pounet95,
Et bien, si tu es rendu à la page 752, il ne t'en reste plus
que 100 à parcourir ! Tu y est presque.... ;-)
Effectivement, ce livre est très bon.
Salutations!
"Pounet95" <pasdepub@oneado.fr> a écrit dans le message de news:
e6fn3VPIGHA.3700@TK2MSFTNGP15.phx.gbl...
Re,
.... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" <mike2050@caramail.com> a écrit dans le message de news:
1B7D2327-61DD-484A-BE85-5AE54B10D87A@microsoft.com...
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis
pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Bonjour Pounet95,
Et bien, si tu es rendu à la page 752, il ne t'en reste plus
que 100 à parcourir ! Tu y est presque.... ;-)
Effectivement, ce livre est très bon.
Salutations!
"Pounet95" a écrit dans le message de news:
Re,
.... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" a écrit dans le message de news:Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis
pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Re,
..... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" a écrit dans le message de news:Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Re,
..... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" <mike2050@caramail.com> a écrit dans le message de news:
1B7D2327-61DD-484A-BE85-5AE54B10D87A@microsoft.com...
Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément
Re,
..... m'énerve ce michdenis ! ;o)))
même pas le temps de parcourir les 858 pages de l'Excellent livre de John
Walkenbach qu'il te fournit la réponse que je viens juste de trouver à la
page 752.
J'me d'mande si michdenis c'est pas le pseudo de JW justement ?
Pub gratuite pour MON livre de référence
Excel 2000 et VBA Guide du développeur
de JW donc aux Editions OEM
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"mike2050" a écrit dans le message de news:Merci Denis,
ça fonctionne à merveille!
quand je pense qu'il n'y avait que un mot à rajouter,
et le pire, c'est que c'est souvent comme ça! En même temps je ne suis pas
un crack en VBA, mais bon...
Je me demandais si je pouvais ajouter ton nom dans les remerciements de
mon
rapport de stage!!!
En tout cas, merci énormément