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 DEs soucis avec mon code VBA

DEs soucis avec mon code VBA

7 réponses
Avatar
JEAN
ce code me permet à chaque appui d'un bouton de commande sur ma feuille de
copier le tableau de la feuille et ensuite de le mettre sur un onglet, avec
pour nom d'onglet la valeur
de [A15]qui est une date :

Finonglet = ActiveSheet.[A15]
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet

mais le probleme c'est que je ne peut qu'appuyer une fois ,et l'onglet est
créer, moi je voudrai appuyer une fois l'onglet se crée et quand j'appuie une
seconde fois une mise à jour se fait sur le meme onglet,je peux donc appuyer
plusieurs fois.

mais la le probleme quand j'apuie une seconde fois il me met impossible de
renommer une feuille de la meme maniere

merci
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
Avatar
Pounet95
Bonsoir,
Il y a eu 'elle voit des nains partout'
Là, j'y vois (mais je dois me tromper ?) un clone de Testou ..............
Si tel n'est pas le cas, mille excuses JEAN

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"JEAN" a écrit dans le message de news:

ce code me permet à chaque appui d'un bouton de commande sur ma feuille de
copier le tableau de la feuille et ensuite de le mettre sur un onglet,
avec
pour nom d'onglet la valeur
de [A15]qui est une date :

Finonglet = ActiveSheet.[A15]
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet

mais le probleme c'est que je ne peut qu'appuyer une fois ,et l'onglet est
créer, moi je voudrai appuyer une fois l'onglet se crée et quand j'appuie
une
seconde fois une mise à jour se fait sur le meme onglet,je peux donc
appuyer
plusieurs fois.

mais la le probleme quand j'apuie une seconde fois il me met impossible de
renommer une feuille de la meme maniere

merci


Avatar
YannX
"JEAN" a écrit dans le message de
news:
ce code me permet à chaque appui d'un bouton de commande sur ma feuille de
copier le tableau de la feuille et ensuite de le mettre sur un onglet,
avec

pour nom d'onglet la valeur
de [A15]qui est une date :

Finonglet = ActiveSheet.[A15]
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet

1°) va faire un tour sur le site de

http://longre.free.fr/pages/prog/index.html
En particulier "Accélération...."

2°/ Application Détection d'erreur :
Dim Sht As Worksheet

On Error Resume Next
Set Sht = Worksheets("Histo"&Finonglet).
On Error GoTo 0
If (Sht Is Nothing) Then Set Sht = Sheets.Add
Sht.Name = "Histo" & Finonglet
myXLSheet = WorkSheetsActivate

if
mais le probleme c'est que je ne peut qu'appuyer une fois ,et l'onglet est
créer, moi je voudrai appuyer une fois l'onglet se crée et quand j'appuie
une

seconde fois une mise à jour se fait sur le meme onglet,je peux donc
appuyer

plusieurs fois.

mais la le probleme quand j'apuie une seconde fois il me met impossible de
renommer une feuille de la meme maniere

merci


Avatar
isabelle
bonjour Jean,

il faudrait vérifier en début de macro si l'onglet existe déjà dans le classeur,

Sub Macro1()
Finonglet = ActiveSheet.[A15]
On Error Resume Next
Sheets("Histo" & Finonglet).Select
If Err.Number = 0 Then
'MiseAjour
Else
Err.Clear
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet
'MiseAjour
End If
End Sub

isabelle


ce code me permet à chaque appui d'un bouton de commande sur ma feuille de
copier le tableau de la feuille et ensuite de le mettre sur un onglet, avec
pour nom d'onglet la valeur
de [A15]qui est une date :

Finonglet = ActiveSheet.[A15]
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet

mais le probleme c'est que je ne peut qu'appuyer une fois ,et l'onglet est
créer, moi je voudrai appuyer une fois l'onglet se crée et quand j'appuie une
seconde fois une mise à jour se fait sur le meme onglet,je peux donc appuyer
plusieurs fois.

mais la le probleme quand j'apuie une seconde fois il me met impossible de
renommer une feuille de la meme maniere

merci


Avatar
Clément Marcotte
Bonjour,

Là, j'y vois (mais je dois me tromper ?) un clone de Testou
.............


Je ne pense pas. Quand il doit lancer sa macro une seconde fois, il
reçoit une erreur parce qu'il ne peut pas avoir deux feuilles du même
nom. De plus, dans ce cas, le message d'erreur de VBA, n'est pas très
explicite. (En fait, rares sont les message d'erreur qui sont
explicites, mais bon...)

(Quoique cela a l'air d'être le même FAI.)

Avatar
JEAN
merci



bonjour Jean,

il faudrait vérifier en début de macro si l'onglet existe déjà dans le classeur,

Sub Macro1()
Finonglet = ActiveSheet.[A15]
On Error Resume Next
Sheets("Histo" & Finonglet).Select
If Err.Number = 0 Then
'MiseAjour
Else
Err.Clear
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet
'MiseAjour
End If
End Sub

isabelle


ce code me permet à chaque appui d'un bouton de commande sur ma feuille de
copier le tableau de la feuille et ensuite de le mettre sur un onglet, avec
pour nom d'onglet la valeur
de [A15]qui est une date :

Finonglet = ActiveSheet.[A15]
Sheets.Add
ActiveSheet.Name = "Histo" & Finonglet

mais le probleme c'est que je ne peut qu'appuyer une fois ,et l'onglet est
créer, moi je voudrai appuyer une fois l'onglet se crée et quand j'appuie une
seconde fois une mise à jour se fait sur le meme onglet,je peux donc appuyer
plusieurs fois.

mais la le probleme quand j'apuie une seconde fois il me met impossible de
renommer une feuille de la meme maniere

merci





Avatar
twinley
Salut Clément,

Mais si mais si,

voilà le dernier mess du fil du 24/11 23:41 écrit par un de ces potes.
Difficile de pas sourire.
Et qui fait comme si y avait que des idiots dans ce forum.
De pharaon, le voilà pape maintenant...

.../...
************
isabelle, il va pas comprendre
au fait

car si j'ai bien compris il veut faire au moins 20 conditions de SI par
rapport a une date donnée et faire la somme de la plage correspondant.

explique la formule stp,j'ai du mal à comprendre y'a pas plus facile
en mettant 7 conditions et en se demerdant pour en mettre 7 autre dans une
autre cellules
ou je sais plus
je m'enrappelle plus.
merci
************

--
à+twinley
"Clément Marcotte" a écrit dans le message
de news:%
Bonjour,

Là, j'y vois (mais je dois me tromper ?) un clone de Testou
.............


Je ne pense pas. Quand il doit lancer sa macro une seconde fois, il
reçoit une erreur parce qu'il ne peut pas avoir deux feuilles du même
nom. De plus, dans ce cas, le message d'erreur de VBA, n'est pas très
explicite. (En fait, rares sont les message d'erreur qui sont
explicites, mais bon...)

(Quoique cela a l'air d'être le même FAI.)





Avatar
Clément Marcotte
Je me suis mis à regretter d'avoir écris cela, mais trop tard...

Des fois, j'ai envie de me faire une règle de message : bloquer tout
@microsoft.com, mais ce serait un peu radical...




"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:
Salut Clément,

Mais si mais si,

voilà le dernier mess du fil du 24/11 23:41 écrit par un de ces
potes.

Difficile de pas sourire.
Et qui fait comme si y avait que des idiots dans ce forum.
De pharaon, le voilà pape maintenant...

.../...
************
isabelle, il va pas comprendre
au fait

car si j'ai bien compris il veut faire au moins 20 conditions de SI
par

rapport a une date donnée et faire la somme de la plage
correspondant.


explique la formule stp,j'ai du mal à comprendre y'a pas plus facile
en mettant 7 conditions et en se demerdant pour en mettre 7 autre
dans une

autre cellules
ou je sais plus
je m'enrappelle plus.
merci
************

--
à+twinley
"Clément Marcotte" a écrit dans le
message

de news:%
Bonjour,

Là, j'y vois (mais je dois me tromper ?) un clone de Testou
.............


Je ne pense pas. Quand il doit lancer sa macro une seconde fois,
il


reçoit une erreur parce qu'il ne peut pas avoir deux feuilles du
même


nom. De plus, dans ce cas, le message d'erreur de VBA, n'est pas
très


explicite. (En fait, rares sont les message d'erreur qui sont
explicites, mais bon...)

(Quoique cela a l'air d'être le même FAI.)