Copie d'une plage de selection en colone dans une autre feuille en ligne

[caldino30]

Bonjour a tous, je suis nouveau et débutant en vba excel et ne sais pas trop comment ca marche ici...
Je me permet de laisser ce message en éspèrant que vous pourrez y répondre .. :x :
Je voudrai pouvoir récupérer une séléction au préalablement définie par l'utilisateur (ex: A1:A5) de par un interface ..ceci étant fait, j'aimerai pouvoir récupérer les valeurs de cette selection en "colone" afin de pouvoir coller les valeurs de cette séléction en ligne dans une seconde feuille... qu'elle sont les syntaxes a utiliser svp ? ca fait pratiquement 1 semaine que j'y suis dessu.. je sèche 🙁...

Je vous met un apercu du début de mon projet vous comprendez mieu.. merci encore !

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

svp ?? :'(

 

[Efgé]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Bonjour caldino30,
Il existe un forum pour EXCEL 2007. Vous aurez plus de chance d'y trouver une réponse.
Si non vous pouvez poster votre exemple en format compatible 2000/2003.
Pour l'exemple je suis sous 2003 donc je n'ouvre pas les XLSX, XLTM....
Cordialement

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Salut Efgé, premièrement jte remercie de te poser sur mon problème, Deuxiemement sur ce fameu forum je n'est pas trouvé grand chose.. cela doit venir de mon manque d'expérience...

J'ai fait une analyse fonctionnelle de mon projet sur doc word 07, je vais la mettre en pièce jointe de sorte a ce que l'on puisse mieu cibler le projet.

Au jour d'aujourd'hui au niveau de mon code j'en suis la :

Private Sub CommandButton1_Click()
Dim x As Variant
Dim o As Variant
Dim cmd As Variant
Dim cell_25x12 As Variant
Dim ktot As Variant

[cell_25x12] = 192

With Sheets("feuil1")
Sheets("feuil1").Select
Range(TextBox1).Select
x = ActiveCell.Value
TextBox2 = x
CommandButton1 = cmd

Application.CutCopyMode = False
Selection.Copy
End With

For Each o In Selection
Y1 = o.EntireColumn.Hidden = False
Y2 = o.EntireRow.Hidden = False
If Y1 And Y2 Then k = k + 1
Next

ktot = [cell_25x12] - k
TextBox3 = ktot

With Sheets("25x12").Select

ActiveCell = Range("A1").Select

Do

Selection.PasteSpecial Paste:=xlPasteValues
ActiveCell.Offset(0, 1).Select

Loop While ktot > 0

End With


End Sub
😱
Merci encore ...

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

dsl pour la taille .. 😱

 

[Staple1600]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Bonjour


caldino30
Enregistre ton fichier au format 97-2003 : extension : xls

Car ici tu es sur le forum Excel

(et pas sur le forum Excel 2007 )

edition: bonjour Efgé

 

[Efgé]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Re
Avec juste votre code, j'ai bien peur de ne pas y arriver. Essayer de poster votre classeur en format xls ou xlt.
A vous relire
Cordialement

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

heuuu dsl aparament mon fichier depasse les 48 ko ... 🙁 jpeux pas essayé de vous l'envoyé kelke part ? merci bcp

Autre question:
Comment je fais pour copier une selection en "colone" qui se trouve dans une page vers une deuxieme page en "ligne" ?? :$ mciiii

 

[jeanpierre]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Bonjour caldino30,

Sauf erreur, ton fichier fait 39Ko au format .XLS et 11Ko en zippé.

Donc le voici (service de dépôt XLD)

 

[Efgé]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Re caldino30, Bonjour jeanpierre,
Merci jeanpierre d'avoir fait le "boulot" de caldino30 en passant son xlsx en xls....
J'ai juste jeté un coup d'oeil sur le code présent dans le ThisWorkboock et j'ai peur de regarder le USF...😀
Je regarde quand même après avoir mangé, mais "c'estpasgagné" (c) Dull
Cordialement

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

A oui je penses avoir kelkes difficultés... en effet ^^. je suis complètement débutant dans en vba... :s merci pour toutes ces réponses.

 

[Efgé]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Re, Bonjour Staple1600 (je n'avais pas vu votre post 😱),
caldino30, je vous fais une proposition (si j'ai bien compris la demande 🙄).
La liste de la Combobox1 est dynamique et prend en compte toute les feuilles du classeurs sauf la Feuil1.
Attention ! Il n'y a aucune vérification quant à la validité de la plage saisie par l'utilisateur dans la textbox1.
Mais, bon... c'est un peu une usine à gaz pour faire un copier/Colage Spécial / Transposé.
PS: J'en ai profité pour revoir la Macro1 qui est dans le module et pas dans le ThisWorkbook comme je l'avais écrit par erreur
Cordialement

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

C quasiment ske je chercher vous m'avez fait 85% du travail, je ne sais comment vous remercier... ! merci bcp...

 

[caldino30]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

c'est encore moi ! vous aller finir par me jeter des tomates ! 😀 suite a ca j'aimerai pouvoir saisire plusieur fois les coordonnées cellule sans que la valeur soit ecrasée, mais bien incrémenté dans les cases suivantes... merci bcp

 

[Efgé]

Re : Copie d'une plage de selection en colone dans une autre feuille en ligne

Re à tous
caldino30, XLD n'est pas là pour proposer des solutions / applications cléfs en main

Je pense qu'il serais plus constructif de :

• Regarder ce que l'enregistreur de macro vous donne comme code
• Essayer d'adapter ce code
• Faire des recherches sur le forum
• Modifier / Améliorer le code que vous avez
• Poster une nouvelle question quand vous rencontrez une difficulté

C'est juste pour que puissiez avancer dans votre projet en comprenant chaque étape 😎
Cordialement