bug sur nom de feuille ?

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

Code:

---

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

Bonjour,

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

Code:

---

ActiveSheet.UsedRange.Columns.Count - 7

---

c'est toujours pareil ? bug

Citation:

---

Envoyé par pilounet54

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:

---

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

---

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

Code:

---

1 2 3

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

---

correspond à

Code:

---

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

---

Citation:

---

c'est toujours pareil ? bug

---

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

Code:

---

ActiveSheet.UsedRange.Columns.Count

---

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:

---

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

---

bug ? dur dur

bonjour a tous

pilounet:

Code:

---

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

le code c'est exatement ce que j'ai besoin (je selectionne une cellule en bas de mon tableau un ligne en dessous tous simplement )

la ligne elle fonctionne sur la feuille Feuil1 mais si tu mais un nom sur la feuille cela ne fonctionne plus la meme ligne

il ya une astuce mais laquelle
essaye si veux bien sur le fichier joint

Bonjour,

pourquoi ne pas répondre aux questions que l'on vous pose pour vous aider ?

comment se manifeste votre "bug" ?

Que voulez-vous faire ? est-ce vraiment sélectionner une cellule ? ou modifier son contenu ?

Comment déterminez vous la cellule à modifier ?

Citation:

---

Envoyé par pilounet54

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

Code:

---

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

---

...

---

Et donc si vous voulez modifier la feuille bilan .. que vient faire "ActiveSheet" dans votre code ?



Pour finir :
Fichier joint dans vos discussions

Bonjour,

Ta plage utilisée comporte 7 lignes et 4 colonnes.

Code:

---

ActiveSheet.UsedRange.Rows.Count + 1 = 7 + 1 = 8

---

Code:

---

ActiveSheet.UsedRange.Columns.Count – 7 = 4 – 7 = - 3

---

Tu ne peux pas sélectionner la cellule Cells(8,-3)

Pour sélectionner la première cellule sous la plage utilisée, tu peux coder

Code:

---

1 2 3 4

Private Sub CommandButton1_Click() ActiveSheet.UsedRange.Select ActiveCell.Offset(ActiveSheet.UsedRange.Rows.Count, 0).Select End Sub

---

Cordialement.

Citation:

---

comment se manifeste votre "bug" ?

---

le bug est completement explicite d'une part il ya un fichier joint

je souhaite simplement avoir une cellule en bas d'une usedrange

Citation:

---

Que voulez-vous faire ? est-ce vraiment sélectionner une cellule ? ou modifier son contenu ?

---

donc selectionne une cellule

Citation:

---

Comment déterminez vous la cellule à modifier ?

---

une ligne en dessous de usedrange

Citation:

---

Et donc si vous voulez modifier la feuille bilan .. que vient faire "ActiveSheet" dans votre code ?

---

ques que je mets svp a la place ?
j'espere avoir repondu ,et je rapelle qu'il y a un fichier joint

bonjour je te remercie tu a trouver ce que je cherchais avec beaucoup de difficulte pas toujours facile :ccool:

++