delete de la selection beug ?
Salut tous,
je n'y connais rien en VBA et je voudrais juste utiliser le fichier excel d'un ami.
le soucis est que lorsque je lance ça macro ça ne marche pas sur mon PC (et sur le siens ça marche nickel).
=> code erreur '438' à la ligne : "Selection" pour l'action ".Delete"
j'ai une nouvelle version d'office et lui à une ancienne donc dans ce sens ça devrait aller normalement.... ?
ps: voici ci dessous le bout de code qui bloque (jusqu'à la ligne dont j'ai parlé plus haut) :
j'espère que vous pourrez m'aider à comprendre d'où vient le problème...
merci d'avance
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Sub ouverture()
' raccourci clavier: Ctrl+f
'plein de variable que je n'ai pas affiché
ProgName = ActiveWorkbook.Name 'Attribue le nom du fichier de travail à la variable ProgName
Application.ScreenUpdating = False
Application.DisplayAlerts = False
TypeGraph = 1
Windows(ProgName).Activate
Sheets("param").Select
ActiveSheet.ChartObjects(1).Activate
ActiveChart.ChartArea.Select
ActiveWindow.Visible = False
Selection.Delete |
