Nargzul
Messages postés438Date d'inscriptionvendredi 9 mai 2003StatutMembreDernière intervention26 juillet 2007
-
27 sept. 2005 à 13:10
cs_pcvesoul
Messages postés123Date d'inscriptionvendredi 21 janvier 2005StatutMembreDernière intervention25 juillet 2007
-
27 sept. 2005 à 15:41
VOila, moi j'ai enregistré une macro, puis j'ai copié le code:
Range("A1:F1").Select
selection.Copy
Sheets(valu).Select
ActiveSheet.Paste
Sheets(base).Select
Application.CutCopyMode = False
et quand j'éxécute la macro pas de problème, mais quand par contre
j'éxécute mon ti bouton, la ca bloque... sur le selection.copy, ou ca
me dit que "qualificateur incorrect"
cs_pcvesoul
Messages postés123Date d'inscriptionvendredi 21 janvier 2005StatutMembreDernière intervention25 juillet 20071 27 sept. 2005 à 15:26
Il est important pour tout acces dans une feuille Excel, ceci afin de passer sur toutes les versions, de bien se positionner dans la feuille, la cellule et d'utiliser le bloc :
With AppExcel.???
.???
End With
Sinon, ca marchera 1 fois, 2 fois mais peut etre pas 10. J'ai assez galérer la dessus pour m'y soumettre maintenant.
Si ca vous interrese, voici un exemple pas trop mal e génération de fichier excel :
Nargzul
Messages postés438Date d'inscriptionvendredi 9 mai 2003StatutMembreDernière intervention26 juillet 20074 27 sept. 2005 à 14:41
excuse, c'était vraiment pas mon intention, c'est juste que ca fait
bien 20minutes que je tourne la dessus, et que je comprend pas, mais
alors pas, que si une macro le fait, que je copie le texte de cette
macro et que je la copie dans une fonction cela ne marche pas.
pour ta solution avec les for j'y avais pensé, mais a mon avis ca
engendre quand meme bien trop de perte de temps processeur de switcher
d'une feuille a l'autre une dizaine de fois au lieu d'une seule,
surtout que cette opération risque de s'effectuer bien des
fois....
cs_pcvesoul
Messages postés123Date d'inscriptionvendredi 21 janvier 2005StatutMembreDernière intervention25 juillet 20071 27 sept. 2005 à 15:01
Pas grave. Mois aussi je rame depuis ce matin pour trouver du code permettant d'ajouter un champ dans une table Excel sous VB6 (je me suis meme fait jeter de Developper.Com car je n'avais pas compris la réponse).
jpleroisse
Messages postés1788Date d'inscriptionmardi 7 novembre 2000StatutMembreDernière intervention11 mars 200627 27 sept. 2005 à 15:09
Bonjour,
Si c'est sur ta feuil1 que tu places ton bouton, tu choisis Barre
d'outils/ Formulaire, dès que tu vas le bouton placer sur la feuillle,
le prg va demander d'affecter une macro. Tu sélectionnes Copie.
Sub Copie()
Range("A1:F1").Select
Selection.Copy
Sheets("valu").Select
Range("A1:F1").Select
ActiveSheet.Paste
Sheets("base").Select
Application.CutCopyMode = False
End Sub
jpleroisse
Si une réponse vous convient, cliquez Réponse Acceptée.