sur une feuille "CALCUL ET FEUILLE DE SCORES" je voudrais recuperer la plage
"B1:F120" et l'afficher dans mon Userform grace au spreadsheet en "B1:F120",
ou dans un autre controle.
j'ais donc place la macro dans la partie initialize de mon Userform pour
initialiser mon affichage ca me sort un code d'erreur.
Erreur 451
property LET non definie dans property GET
peut etre ca vien de excel 2000 sinon je sais pas.
Voici le code que michdenis m'a donner
'------------------------------
Private Sub CommandButton1_Click()
Dim Rg As Range
With Worksheets("CALCUL ET FEUILLE DE SCORES")
Set Rg = .Range("B1:B1:F120")
End With
With Spreadsheet1
.Range(.Range("B1"), .Cells(Rg.Rows.Count, _
Rg.Columns.Count + Rg(1).Column)).Value = Rg.Value
End With
Set Rg = Nothing
:-)))))) trop bon (pas pour les non hispanophones, hélas) jps
"CAP2" a écrit dans le message de news:
PS : "Caracol" ne prend bien qu'un "r", tandis que "cojones" n'en prend aucun, malgré une prononciation qui pourrait préter à confusion ;o)))
Daniel.M
Disculpeme, jefe. :-)
C'est noté.
Daniel M.
"sabatier" wrote in message news:%
daniel, un seul "f" à aficionado : c'est la dernière fois que je te le dis et note au passage qu'en espagnol, aucune consonne ne double (je ne parle pas bien sûr du "ll" qui est une lettre à lui tout seul) jps
Disculpeme, jefe. :-)
C'est noté.
Daniel M.
"sabatier" <biscotteUnScudJpsabatdelaile@wanadoo.fr> wrote in message
news:%23qRGWFyuEHA.908@TK2MSFTNGP11.phx.gbl...
daniel, un seul "f" à aficionado : c'est la dernière fois que je te le dis
et note au passage qu'en espagnol, aucune consonne ne double (je ne parle
pas bien sûr du "ll" qui est une lettre à lui tout seul)
jps
daniel, un seul "f" à aficionado : c'est la dernière fois que je te le dis et note au passage qu'en espagnol, aucune consonne ne double (je ne parle pas bien sûr du "ll" qui est une lettre à lui tout seul) jps
jps
ya te absolví, daniel jps
"Daniel.M" a écrit dans le message de news:
Disculpeme, jefe. :-)
C'est noté.
Daniel M.
"sabatier" wrote in message news:%
daniel, un seul "f" à aficionado : c'est la dernière fois que je te le dis
et note au passage qu'en espagnol, aucune consonne ne double (je ne parle
pas bien sûr du "ll" qui est une lettre à lui tout seul) jps
ya te absolví, daniel
jps
"Daniel.M" <prenom.maher@bigfoot.inutil.com> a écrit dans le message de
news:euQ0D91uEHA.2016@TK2MSFTNGP15.phx.gbl...
Disculpeme, jefe. :-)
C'est noté.
Daniel M.
"sabatier" <biscotteUnScudJpsabatdelaile@wanadoo.fr> wrote in message
news:%23qRGWFyuEHA.908@TK2MSFTNGP11.phx.gbl...
daniel, un seul "f" à aficionado : c'est la dernière fois que je te le
dis
et note au passage qu'en espagnol, aucune consonne ne double (je ne
parle
pas bien sûr du "ll" qui est une lettre à lui tout seul)
jps
daniel, un seul "f" à aficionado : c'est la dernière fois que je te le dis
et note au passage qu'en espagnol, aucune consonne ne double (je ne parle
pas bien sûr du "ll" qui est une lettre à lui tout seul) jps
Lyss
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le même code d'erreur que celui de michdenis. ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
"Daniel.M" a écrit dans le message de news:%
Allo Denis et Lyss,
Pour les afficionados de la simplification,
Private Sub UserForm_Initialize()
With Worksheets("La Feuille").Range("B1:F120") Spreadsheet1.Range("B1").Resize(.Rows.Count, .Columns.Count) = .Value End With
End Sub
AMA, il y a moins de risque d'erreur si on déplace la destination (C5 au lieu de
B1 par exemple) puisque ça ne nécessitera qu'un seul changement. Il en va de
même pour la source.
Salutations,
Daniel M.
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le
même code d'erreur que celui de michdenis.
ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je
vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
"Daniel.M" <prenom.maher@bigfoot.inutil.com> a écrit dans le message de
news:%23gTljKuuEHA.1404@TK2MSFTNGP11.phx.gbl...
Allo Denis et Lyss,
Pour les afficionados de la simplification,
Private Sub UserForm_Initialize()
With Worksheets("La Feuille").Range("B1:F120")
Spreadsheet1.Range("B1").Resize(.Rows.Count, .Columns.Count) = .Value
End With
End Sub
AMA, il y a moins de risque d'erreur si on déplace la destination (C5 au
lieu de
B1 par exemple) puisque ça ne nécessitera qu'un seul changement. Il en va
de
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le même code d'erreur que celui de michdenis. ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
"Daniel.M" a écrit dans le message de news:%
Allo Denis et Lyss,
Pour les afficionados de la simplification,
Private Sub UserForm_Initialize()
With Worksheets("La Feuille").Range("B1:F120") Spreadsheet1.Range("B1").Resize(.Rows.Count, .Columns.Count) = .Value End With
End Sub
AMA, il y a moins de risque d'erreur si on déplace la destination (C5 au lieu de
B1 par exemple) puisque ça ne nécessitera qu'un seul changement. Il en va de
même pour la source.
Salutations,
Daniel M.
Daniel.M
Salut,
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta macro)
Salutations,
Daniel M.
"Lyss" wrote in message news:
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le même code d'erreur que celui de michdenis. ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
Salut,
1. Que retourne
Msgbox Spreadsheet1.Name
placé juste avant le With ?
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta
macro)
Salutations,
Daniel M.
"Lyss" <lyssandre63@hotmail.com> wrote in message
news:eClqLV3uEHA.2200@TK2MSFTNGP11.phx.gbl...
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le
même code d'erreur que celui de michdenis.
ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je
vais pas laisser tomber ).
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta macro)
Salutations,
Daniel M.
"Lyss" wrote in message news:
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le même code d'erreur que celui de michdenis. ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
Lyss
Bon voila
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
ca renvoi spreadsheet1
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta
macro)
Ca par contre ca me renvoie un code qui me dit que ma feuille est protegée ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus mais pas dans le userform ??????
Et en plus ca supprime les formules.
Voila c'est tout.
Merci.
"Daniel.M" a écrit dans le message de news:
Salut,
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta
macro)
Salutations,
Daniel M.
"Lyss" wrote in message news:
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le même code d'erreur que celui de michdenis. ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je
vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
Bon voila
1. Que retourne
Msgbox Spreadsheet1.Name
placé juste avant le With ?
ca renvoi spreadsheet1
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que
tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT
d'exécuter ta
macro)
Ca par contre ca me renvoie un code qui me dit que ma feuille est protegée
ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus
mais pas dans le userform ??????
Et en plus ca supprime les formules.
Voila c'est tout.
Merci.
"Daniel.M" <prenom.maher@bigfoot.inutil.com> a écrit dans le message de
news:ewRMCf3uEHA.3828@TK2MSFTNGP12.phx.gbl...
Salut,
1. Que retourne
Msgbox Spreadsheet1.Name
placé juste avant le With ?
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que
tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT
d'exécuter ta
macro)
Salutations,
Daniel M.
"Lyss" <lyssandre63@hotmail.com> wrote in message
news:eClqLV3uEHA.2200@TK2MSFTNGP11.phx.gbl...
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le
même code d'erreur que celui de michdenis.
ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si
je
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
ca renvoi spreadsheet1
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta
macro)
Ca par contre ca me renvoie un code qui me dit que ma feuille est protegée ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus mais pas dans le userform ??????
Et en plus ca supprime les formules.
Voila c'est tout.
Merci.
"Daniel.M" a écrit dans le message de news:
Salut,
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
2. Par curiosité, si tu remplaces Spreadsheet1 par ActiveSheet, est-ce que tu
obtiens le même message d'erreur? (N'oublie de sauvegarder AVANT d'exécuter ta
macro)
Salutations,
Daniel M.
"Lyss" wrote in message news:
Salut, me revoila,
désolé mais même le code fournit gracieusement par Daniel.M me renvoi le même code d'erreur que celui de michdenis. ce qui ne fais pas avancer le schmilblick.
Alors si quelqu'un a une autre idée merci. ( j'en suis a me demander si je
vais pas laisser tomber ).
HEEEELP PLEEEEEAZE.
Daniel.M
Hello,
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
ca renvoi spreadsheet1
Humm. Une variable qui a le même nom que la feuille qu'elle identifie: c'est pas kasher...
ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus mais pas dans le userform ??????
Le fait que ça fonctionne (la copie des valeurs, écrasement des anciennes) avec ActiveSheet confirme que le problème est au niveau de SpreadSheet1 (la variable / le nom).
Renomme donc ta variable SpreadSheet1 par SSt1 dans l'ensemble de ton code. Si tu as encore la même erreur. Avise et je te contacterai en bal perso pour récupérer ton fichier et voir ce qu'on pourrait y faire.
Car, j'ai fait une recherche dans les NGs sur la méthode Resize et il n'y a pas de problème spécial avec celle-ci.
Salutations,
Daniel M.
Hello,
1. Que retourne
Msgbox Spreadsheet1.Name
placé juste avant le With ?
ca renvoi spreadsheet1
Humm. Une variable qui a le même nom que la feuille qu'elle identifie: c'est pas
kasher...
ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus
mais pas dans le userform ??????
Le fait que ça fonctionne (la copie des valeurs, écrasement des anciennes) avec
ActiveSheet confirme que le problème est au niveau de SpreadSheet1 (la variable
/ le nom).
Renomme donc ta variable SpreadSheet1 par SSt1 dans l'ensemble de ton code.
Si tu as encore la même erreur. Avise et je te contacterai en bal perso pour
récupérer ton fichier et voir ce qu'on pourrait y faire.
Car, j'ai fait une recherche dans les NGs sur la méthode Resize et il n'y a pas
de problème spécial avec celle-ci.
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
ca renvoi spreadsheet1
Humm. Une variable qui a le même nom que la feuille qu'elle identifie: c'est pas kasher...
ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus mais pas dans le userform ??????
Le fait que ça fonctionne (la copie des valeurs, écrasement des anciennes) avec ActiveSheet confirme que le problème est au niveau de SpreadSheet1 (la variable / le nom).
Renomme donc ta variable SpreadSheet1 par SSt1 dans l'ensemble de ton code. Si tu as encore la même erreur. Avise et je te contacterai en bal perso pour récupérer ton fichier et voir ce qu'on pourrait y faire.
Car, j'ai fait une recherche dans les NGs sur la méthode Resize et il n'y a pas de problème spécial avec celle-ci.
Salutations,
Daniel M.
Lyss
Bon c'est normal que Spreadsheet1.Name me donne ce resultat vu que la spread de mon Userform s'apelle comme ca.
Mais je n'utilise pas de variable du même nom donc je comprend pas ou ca coince.
Si tu veux je peux t'envoyer le fichier pour que tu jette un oeil.
Salutation et Merci.
"Daniel.M" a écrit dans le message de news:
Hello,
1. Que retourne Msgbox Spreadsheet1.Name placé juste avant le With ?
ca renvoi spreadsheet1
Humm. Une variable qui a le même nom que la feuille qu'elle identifie: c'est pas
kasher...
ce qui est normal si j'enleve la protection de la feuille ca reecrit dessus
mais pas dans le userform ??????
Le fait que ça fonctionne (la copie des valeurs, écrasement des anciennes) avec
ActiveSheet confirme que le problème est au niveau de SpreadSheet1 (la variable
/ le nom).
Renomme donc ta variable SpreadSheet1 par SSt1 dans l'ensemble de ton code.
Si tu as encore la même erreur. Avise et je te contacterai en bal perso pour
récupérer ton fichier et voir ce qu'on pourrait y faire.
Car, j'ai fait une recherche dans les NGs sur la méthode Resize et il n'y a pas
de problème spécial avec celle-ci.
Salutations,
Daniel M.
Bon c'est normal que Spreadsheet1.Name me donne ce resultat vu que la spread
de mon Userform s'apelle comme ca.
Mais je n'utilise pas de variable du même nom donc je comprend pas ou ca
coince.
Si tu veux je peux t'envoyer le fichier pour que tu jette un oeil.
Salutation et Merci.
"Daniel.M" <prenom.maher@bigfoot.inutil.com> a écrit dans le message de
news:ucpeu14uEHA.2804@TK2MSFTNGP14.phx.gbl...
Hello,
1. Que retourne
Msgbox Spreadsheet1.Name
placé juste avant le With ?
ca renvoi spreadsheet1
Humm. Une variable qui a le même nom que la feuille qu'elle identifie:
c'est pas
kasher...
ce qui est normal si j'enleve la protection de la feuille ca reecrit
dessus
mais pas dans le userform ??????
Le fait que ça fonctionne (la copie des valeurs, écrasement des anciennes)
avec
ActiveSheet confirme que le problème est au niveau de SpreadSheet1 (la
variable
/ le nom).
Renomme donc ta variable SpreadSheet1 par SSt1 dans l'ensemble de ton
code.
Si tu as encore la même erreur. Avise et je te contacterai en bal perso
pour
récupérer ton fichier et voir ce qu'on pourrait y faire.
Car, j'ai fait une recherche dans les NGs sur la méthode Resize et il n'y
a pas
