Bonjour,
J aimerais vous exposer mon probleme de la semaine passee:
Je travaille sur une base de donnees dont tant les lignes que les colonnes varient a chaque update de la base de donnees.
J aimerais "simplement" copier l ensemble de ce tableau dans une nouvelle feuille excel pour y travailler dessus. L operation que j aimerais faire semble si simple mais je n y arrive pas a cause des colonnes surtout.
J ai pense ecrire ceci mais excel ne l accepte pas.
Dim a As Long
Dim c As Interior
c = Columns("R[4]C[1]:R[4]C[1000]")
a = Sheets("Pivot").[A65536].End(xlUp).Row
Sheets("Pivot").Range("A3:R" & [a] & "C" & [c]).Select
Selection.copy
Sheets("Math").Range("B6").Select
Selection.Paste
Pourriez vous m aider s'il vous plait?
Ci joint un fichier avec un simple tableau comme exemple.
Merci pour votre temps.
Xavier
J aimerais vous exposer mon probleme de la semaine passee:
Je travaille sur une base de donnees dont tant les lignes que les colonnes varient a chaque update de la base de donnees.
J aimerais "simplement" copier l ensemble de ce tableau dans une nouvelle feuille excel pour y travailler dessus. L operation que j aimerais faire semble si simple mais je n y arrive pas a cause des colonnes surtout.
J ai pense ecrire ceci mais excel ne l accepte pas.
Dim a As Long
Dim c As Interior
c = Columns("R[4]C[1]:R[4]C[1000]")
a = Sheets("Pivot").[A65536].End(xlUp).Row
Sheets("Pivot").Range("A3:R" & [a] & "C" & [c]).Select
Selection.copy
Sheets("Math").Range("B6").Select
Selection.Paste
Pourriez vous m aider s'il vous plait?
Ci joint un fichier avec un simple tableau comme exemple.
Merci pour votre temps.
Xavier