Bonsoir le Forum, Bonsoir à Tous,
Il me faut travailler sur énormément de fichiers chaque jour pour transposer des infos de colonnes en lignes.
pour exemple
Sur Feuil1 je possède des infos de A1:O100
Sur Feuil2 il y a aucune info
Le code suivant me permet de copier coller de feuil1 sur feuil2 (de colonnes en lignes de la Feuil1 sur la Feuil2).
Pas de problème si feuil1 possède bien 100 lignes de données sans vides (donc de A1:O100)
Par contre si il y a moins de lignes avec des données par exemple 90 lignes
Visual Basic m'informe d'une erreur :
Erreur d'execution'9':
L'indice n'appartient pas à la sélection.
ou si ma feuille est supérieur à 100 lignes elle ne prends en compte que 100 lignes et non au dela.
Pour travailler sur un fichier pas de problème je réajuste manuellement le nombre Rows("1:100").Select, mais comme je travaille sur une qte importante de fichiers celà devient très vite contraignant.
Est-il possible de m'orienter pour que le code ci-dessus puisse interpréter automatiquement le nombre de ligne réellement rempli sans que je soit obliger de manipuler à chaque nouveau fichier Rows(":").Select
Merci par avance de votre aide.
Il me faut travailler sur énormément de fichiers chaque jour pour transposer des infos de colonnes en lignes.
pour exemple
Sur Feuil1 je possède des infos de A1:O100
Sur Feuil2 il y a aucune info
Le code suivant me permet de copier coller de feuil1 sur feuil2 (de colonnes en lignes de la Feuil1 sur la Feuil2).
Pas de problème si feuil1 possède bien 100 lignes de données sans vides (donc de A1:O100)
Code:
Rows("1:100").Select
Selection.Copy
Sheets("Feuil2").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Application.CutCopyMode = False
Par contre si il y a moins de lignes avec des données par exemple 90 lignes
Visual Basic m'informe d'une erreur :
Erreur d'execution'9':
L'indice n'appartient pas à la sélection.
ou si ma feuille est supérieur à 100 lignes elle ne prends en compte que 100 lignes et non au dela.
Pour travailler sur un fichier pas de problème je réajuste manuellement le nombre Rows("1:100").Select, mais comme je travaille sur une qte importante de fichiers celà devient très vite contraignant.
Est-il possible de m'orienter pour que le code ci-dessus puisse interpréter automatiquement le nombre de ligne réellement rempli sans que je soit obliger de manipuler à chaque nouveau fichier Rows(":").Select
Merci par avance de votre aide.
Dernière édition: