Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Quelques questions en Macros

Quelques questions en Macros

27 réponses
Avatar
Rex
Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes (et pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste toujours de 3 à
3000?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une innovation pour
moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la cellule L23

Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on est parti?


Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
cousinhub
Bonjour,
Excès de chocolat, ou de liquide pour l'accompagner?;-)
Y a rien à faire, la cellule L23 refuse de se vider



Extrait de ta procédure :

Private Sub ToggleButton1_Click()
Range("K24").Select
Selection.ClearContents
......
Bon réveil....:-)

Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des chiffres
dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit dans
L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui ont
la



même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même temps.

pour le togglebutton la syntaxe que j'ai proposée c'est du détail ,
chacun code selon son style, j'aime bien déclarer les variables mais
pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta question
tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y glisser
une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes (et
pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste toujours
de







3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on est
parti?




Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille






















Avatar
Rex
HONTE SUR MOI


Oh lalalala


Et en plus ce n'est pas ce que tu me signale, si justement d'ailleurs, qui
cause problème

Dans ma macro originale les cellules sont correctes, c'est en "chipottant"
pour réduire le fichier avant Ci-jointage qu'il s'est passé quelque chose
donc ton commentaire est juste, mais n'est pas la cause du problème

MAIS LA HONTE

Ton commentaire m'as fais vérifier et que vois-je de mes yeux enclués de
chocolat

Des heures à traffiquer une macro qui se trouve dans un module
Alors que la même macro se trouve sur la feuille

Donc Excel prendra tout bonnement celle qui est la plus proche
sans trop se poser de questions

Donc MORALITE


Toujours faire attention ou on mets ses affaires

Comme quoi il faut toujours écouter sa mère

Elle qui me disait "A force de tout mettre n'importe ou, un jour tu ne
trouveras plus rien




En tous les cas merci pour toute l'aide

Et maintenant j'ai plus qu'à créer une quarantaine de noms pour résoudre
l'autre problème

A bientôt et merci

Rex


"cousinhub" a écrit dans le message de news:

Bonjour,
Excès de chocolat, ou de liquide pour l'accompagner?;-)
Y a rien à faire, la cellule L23 refuse de se vider



Extrait de ta procédure :

Private Sub ToggleButton1_Click()
Range("K24").Select
Selection.ClearContents
......
Bon réveil....:-)

Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des
chiffres





dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit
dans





L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui
ont





la
même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même temps.

pour le togglebutton la syntaxe que j'ai proposée c'est du détail ,
chacun code selon son style, j'aime bien déclarer les variables mais
pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta
question






tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y
glisser






une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes
(et









pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste
toujours









de
3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on est
parti?




Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille
























Avatar
LSteph
Bonjour Rex,

:-| heu renseigne toi mais je crois que Morphée est un mec!

Donc MORALITE


Toujours faire attention ou on mets ses affaires


Pour les cellules je suis bien d'accord aussi.

;o)) tu peux aussi dire merci à CousinHub, en effet!

@+

lSteph





Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des chiffres
dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit dans
L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui ont
la



même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même temps.

pour le togglebutton la syntaxe que j'ai proposée c'est du détail ,
chacun code selon son style, j'aime bien déclarer les variables mais
pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta question
tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y glisser
une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes (et
pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste toujours
de







3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on est
parti?




Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille






















Avatar
fetnat
Bonjour,

Je confirme, c'est un mec...Même maquillé on ne peut pas se tromper.

Fetnat


Bonjour Rex,

:-| heu renseigne toi mais je crois que Morphée est un mec!

Donc MORALITE


Toujours faire attention ou on mets ses affaires


Pour les cellules je suis bien d'accord aussi.

;o)) tu peux aussi dire merci à CousinHub, en effet!

@+

lSteph





Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des chiffres
dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit dans
L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui ont
la



même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même temps.

pour le togglebutton la syntaxe que j'ai proposée c'est du détail ,
chacun code selon son style, j'aime bien déclarer les variables mais
pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta question
tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y glisser
une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes (et
pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste toujours
de







3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on est
parti?




Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille
























Avatar
Rex
Bon ça va

On va quand même pas en faire un plat

C'est un mec

Et comment suis-je sensé dormir en toute quiètude, maintnenant que je sais
que je dors avec un mec


C'est surtout ma femme qui sera surprise

:-))))))

Rex



"LSteph" a écrit dans le message de news:

Bonjour Rex,

:-| heu renseigne toi mais je crois que Morphée est un mec!

Donc MORALITE


Toujours faire attention ou on mets ses affaires


Pour les cellules je suis bien d'accord aussi.

;o)) tu peux aussi dire merci à CousinHub, en effet!

@+

lSteph





Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des
chiffres





dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit
dans





L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui
ont





la
même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même temps.

pour le togglebutton la syntaxe que j'ai proposée c'est du détail ,
chacun code selon son style, j'aime bien déclarer les variables mais
pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta
question






tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y
glisser






une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes
(et









pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste
toujours









de
3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on est
parti?




Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille
























Avatar
Rex
Et ce que j'ai dis à LSteph est valable pour toi aussi

Dorénavant je vais avoir des nuits peuplès de cauchemar
de mecs maquillé qui se faufillent dans mon lit dés que je ferme les yeux

Et ben tu sais quoi?

Je ne te dis même pas merci

Nah !

Rex :-)))))))

A bientôt






"fetnat" a écrit dans le message de news:
e$
Bonjour,

Je confirme, c'est un mec...Même maquillé on ne peut pas se tromper.

Fetnat


Bonjour Rex,

:-| heu renseigne toi mais je crois que Morphée est un mec!

Donc MORALITE


Toujours faire attention ou on mets ses affaires


Pour les cellules je suis bien d'accord aussi.

;o)) tu peux aussi dire merci à CousinHub, en effet!

@+

lSteph





Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des
chiffres






dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit
dans






L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui
ont






la
même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même
temps.








pour le togglebutton la syntaxe que j'ai proposée c'est du détail
,







chacun code selon son style, j'aime bien déclarer les variables
mais







pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta
question







tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y
glisser







une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes
(et










pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste
toujours










de
3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on
est










parti?
Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille


























Avatar
fetnat
Bonjour,

De nos jours, bloquer Paris pour défiler avec une plume dans l'oignon
est assez commun. Chacun fait comme il aime. Nous voulions simplement
t'ouvrir les yeux..

Bonne journée.

Fetnat

Et ce que j'ai dis à LSteph est valable pour toi aussi

Dorénavant je vais avoir des nuits peuplès de cauchemar
de mecs maquillé qui se faufillent dans mon lit dés que je ferme les yeux

Et ben tu sais quoi?

Je ne te dis même pas merci

Nah !

Rex :-)))))))

A bientôt






"fetnat" a écrit dans le message de news:
e$
Bonjour,

Je confirme, c'est un mec...Même maquillé on ne peut pas se tromper.

Fetnat


Bonjour Rex,

:-| heu renseigne toi mais je crois que Morphée est un mec!

Donc MORALITE


Toujours faire attention ou on mets ses affaires
Pour les cellules je suis bien d'accord aussi.


;o)) tu peux aussi dire merci à CousinHub, en effet!

@+

lSteph





Bonjour

Je sors tout doucement des bras de cette délicieuse Morphée


Et malgré ça, ça ne vas pas mieux

Y a rien à faire, la cellule L23 refuse de se vider
Pourtant crois-moi mes données sont là

Donc ce que j'ai fais est ceci

J'ai supprimé toutes mes feuilles et je le poste comme ça

Il y a donc des liensqui risque de bloquer, mais la macro etc sont là

Si tu as le temps

http://cjoint.com/?ejoNXhwMVE


A bientôt
Et merci


Rex


"LSteph" a écrit dans le message de news:
#B$
...vérifie comme le suggérait Cous'Hub où sont réellement
tes données .

Bonjour,

En ce cas tout ce qui t'a été proposé à ce titre efface bien la
cellule.


Sinon, c'est peut-être que finalement ta cellule L23 n'intervient pas
dans le calcul , vérifie conmme suggérais Cous'Hub où sont réellement
tes données .

Bon courage.

lSteph


Bonsoir

Je poste ceci et je vais au lit

Si tu me réponds tu n'auras donc plus de réaction cette nuit


Je vais essayer d'être claire (Claire c'est une fille, clair c'est
plus net)

Donc je vais essayer d'être clair

Il faut que quand je cache les lignes 23 et 24
les autres cellules de ma feuille ne tiennent plus compte des
chiffres






dans
la cellules L23

Qu'elles soient supprimés, remisent à zéro cela m'est égale

MAIS elles ne doivent plus intervenir dans mes calculs

Et si j'ai besoin de remise pour un autre client, je la réinscrit
dans






L23
De toutes façons grâce à mon patron, il n'y a pas deux clients qui
ont






la
même remise

A bientôt

Rex


"LSteph" a écrit dans le message de news:

Oui j'ai vu!

Le temps qu'on formule un réponse et quelqu'un répond en même
temps.







pour le togglebutton la syntaxe que j'ai proposée c'est du détail
,







chacun code selon son style, j'aime bien déclarer les variables
mais







pour ton souci la réponse de JB va tout aussi bien.
Le bug vient probablement d'une mauvaise compréhension de ta
question







tu as demandé clearcontents !
Une fois que c'est effacé cela ne va pas revenir!
Par suite d'un premier masquage L23 demeure donc effacée!
Tu peux aussi prévoir dans l'autre branche conditionnelle d'y
glisser







une formule correspondant à ta ristourne.


Joyeuses Pâques à toi itou...
Moi Dodo!

@demain

lSteph

Bonsoir et merci

A mon avis je dois avoir un sérieux bug quelque part

Tu es le troisième à te pencher sur cette suppression de cellule

Et cela ne fonctionne pas

En deux mots

J'ai un total en F22
En L23 je mets le pourcent de remise éventuelle
En F23 j'ai le montant de la remise
En F24 j'ai le montant remise déduite

Puis j'ajoute TVA transport etc

Et en F29 j'ai le total à payer

Et celui reste le même que les lignes soient cachées ou pas

Et ça, c'est pas ce que je veux

Je veux que si je cache ces lignes le montant soit calculé SANS
remise





A bientôt

Et Joyeuse Pâques

Rex de moins en moins :-))))))))
Et de plus en plus :-((



"LSteph" a écrit dans le message de news:
#
Bonjour,
1-
Utilise une plage nommée
2-
Private Sub ToggleButton1_Click()
With Rows("23:24")
If .Hidden Then
ToggleButton1.Caption = "Masquer colonnes"
Else
Range("L23").ClearContents
ToggleButton1.Caption = "Afficher colonnes"
End If
.Hidden = Not .Hidden
End With
End Sub

3-
C'est d'abord avant de partir qu'il faut noter :

Sub exemple()
Dim mysh As String, myr As String
mysh = ActiveSheet.Name
myr = Selection.Address
'...
'...tes instructions
'...
Sheets(mysh).Activate
Range(myr).Select
end sub

'Cdlt

'lSteph

Bonsoir et Joyeuse Pâques


J'ai quelques petis soucis avec des macros et des fonctions

ATTENTION il y a TROIS questions !!!!!

Voici la première

Dans une feuille je fais appelle à la fonction
=INDEX(Offers!$E$3:$E$3000;$A$3)

Et elle fonctionne (c'est le cas de le dire) très bien

MAIS

Si, dans la feuille "Offers" je supprime les lignes 4 - 7
Tous mes index deviennent =INDEX(Offers!$E$8:$E$3005;$A$3)

Avec un 8 à la place du 3

Et pour tant je vais devoir régulièrement supprimer des lignes
(et










pas
toutes en séquences)

Y a-t-il moyen de faire en sorte que cette fonction reste
toujours










de
3
à
3000?


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx







Voici la deuxième

J'ai créé un bouton "Toggle" (et j'en suis fière, c'est une
innovation
pour


moi!)

Avec le code suivant
Private Sub ToggleButton1_Click()
If Rows("23:24").Hidden = True Then
Rows("23:24").Hidden = False
ToggleButton1.Caption = "Masquer colonnes"
Exit Sub
End If
Rows("23:24").Hidden = True
ToggleButton1.Caption = "Afficher colonnes"
End Sub


Je voudrais qu'avant de cacher les lignes 23 24 elle vide la
cellule







L23
Donc je fais Range("L23").ClearContents

Mais ou dois-je insèrer cette ligne?

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Troisième et dernière pour ce soir

Quelle commande ou fonction peut-on insérer à la fin d'une macro
pour que l'on reviennent sur la feuille et la cellule d'ou on
est










parti?
Merci et à bientôt (ou demain)

Rex ;-)))))




Elle fait réference à une autre feuille




























1 2 3