Pour thautheme

Bonjour

Probablement avec UsedRange !

fonction inconnue de Excel, merci quand même

J'ai essayé mais c'est pas encore ca :

Sub TRANSFO()
'
' TRANSFO Macro
'

'
'Worksheets("Sheet1").Activate
ActiveSheet.UsedRange.Select
Application.Run "'traitement automatique générique.xlsm'!transposée"
Application.CutCopyMode = False
Application.Run "'traitement automatique générique.xlsm'!Feuil3.DelLigne"
End Sub

Sub transposée()
'
' transposée Macro
'

'
'Sheets("Feuil1").Select

'ActiveWindow.LargeScroll ToRight:=-4
Selection.Copy
Sheets("Feuil3").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub

Re,

Simplement :

Option Explicit
Public Sub TRANSFO()
  Worksheets("Feuil1").UsedRange.Copy
  Worksheets("Feuil3").[A1].PasteSpecial xlPasteAll, , , True
  Application.CutCopyMode = False
End Sub

Un grand merci à tous :
j'avais pensé selectionner toute la feuille 1 et faire une copie mais il refusait le trop grand nombre de colonnes et lignes
je me suis inspiré de ton code pour écrire cela qui n'est pas tres different :

Worksheets("Feuil1").UsedRange.Copy
Sheets("Feuil3").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
ce qui permet en effet de selectionner toutes les donnees à la souris avant de proceder à la transposee.

Si je peux me permettre de te poser un autre question au sujet de ton code:
A quoi cela sert il de preceder le sub <fonction> par public et aussi par option explicit ?

Bonjour,

Public défini la portée du code contenu dans un module : il est visible de l'ensemble des projets ouverts et donc utilisable depuis tous leurs modules. On peut limiter cette portée aux modules du projet qui contient le code, et donc interdire son emploi depuis les autres projets ouverts, en ajoutant Option Private Module au début du module concerné.

Option Explicit, toujours placé en début de module, rend obligatoire la déclaration de toutes les variables utilisées dans ce module. Lorsque cette instruction est omise, les variables sont déclarées de manière implicite lors de leur première utilisation, cela réserve souvent des surprises lors de l'exécution du code, notamment des erreurs du genre "Incompatibilité de type". Toujours commencer tous ses modules par Option Explicit est une excellente méthode qui évite ces problèmes et rend le code plus compréhensible.

La touche F1 : en utilisant l'éditeur visual basic, lorsqu'on place le curseur texte sur un mot dans le code , permet d'obtenir l'aide sur ce mot. Assez complet, cet aide t'aurais donné les renseignements demandés !
Cordialement
Patrice

Merci beaucoup, si ces infos viennent d'un manuel, puis-je en avoir les références ? je reconnais tout à fait mes erreurs mais apprends vite et bien !

Certaines fonctions Excel donnent des résultats erronés comme RECHERCHEV
et je pense qu'en ayant le bon manuel, je saurais trouver l'origine de l'erreur, je suis allé sur le forum Microsoft mais en appliquant à la lettre j'ai le fameux N/A alors que la valeur recherchee dans deux tableaux differents sont identiques et de meme format. Evidemment, en specifiant le parametre VRAI, j'ai une valeur de retour non voulue. Pour essayer de comprendre le resultat obtenu, j'ai changé le numero de colonne mais c'est completement à proximatif là où je n'attends qu'une seule valeur.
Merci et bonne journée.