Discussion :

[pilounet54]

bonjour
j'ai c'est ligne de code je souhaiterai quelle fonctionne sur feuille "bilan"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(ActiveSheet.UsedRange.Rows.Count + 1, ActiveSheet.UsedRange.Columns.Count - 7).Select

j'ai essayé plein de chose Worksheets Sheets mais il toujours des bug
es que vous pouvez m'aider ?

"il y a qu'une seul ligne de code uniquement"
merci
fichier joint

[jfontaine]

Bonjour,

Es tu sur que la ligne ci dessous ne sort pas du cadre ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.UsedRange.Columns.Count - 7

[pilounet54]

c'est toujours pareil ? bug

[fring]

je souhaiterai quelle fonctionne sur feuille "bilan"

Bonjour,

On ne peut pas sélectionner une cellule d'une feuille si cette feuille n'est pas active.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets("xxx").Activate
Cells(....).Select

mais dans la plupart des cas, on peut se passer des "Select"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sheets("feuil1").Activate
Cells(1, 1).Select
X = ActiveCell.Value

correspond à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

X = Sheets("feuil1").Cells(1, 1).Value

[pilounet54]

si cela te fais rien regarde le fichier joint
il qu'un bouton et qu'une ligne de code et normalement ça devrai etre bon
mais des l'instant que tu mets un nom de la feuille "bilan"
j'essaye de plein de façon bug

si tu veus bien regarde meme avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets("bilan").Activate
Cells(ActiveSheet.UsedRange.Rows.Count + 1, ActiveSheet.UsedRange.Columns.Count - 7).Select

bug ? dur dur

[patricktoulon]

bonjour a tous

pilounet:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(ActiveSheet.UsedRange.Rows.Count + 1, ActiveSheet.UsedRange.Columns.Count - 7).Select

question1:
le "-7" sur les colonne utilisée te donne quoi en dur est ce bien utile?
Sheets("bilan").Activate

[jfontaine]

c'est toujours pareil ? bug

Peux tu être plus précis.
Quelle est la valeur de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.UsedRange.Columns.Count