bonjour,

j'ai quelques soucis avec cette macro

Sub engsansmacro()

'je veux pouvoir enregistrer la feuil1 sipac avec toute la mise en page
'(entete et pieds de page compris)ça ça a l'ai rde marcher
'sans enregistrer les autres feuilles ni les macro ne conservant que
'la feuil1 sipac sur mon nouveau fichier renommé de la date d'extraction
situé
'en a20 (c'est une date ecrite en lettre que me renvoie un formule)de la
feuil1 ça ça marche 'pas mal !!.

'je voudrais que les formules n'apparaissent plus (juste les valeurs) marche
pas
'le problème est que la macro ecrit 2 fois la date en renommant le fichier
'le fichier de base ne se ferme pas sans s'enregistrer
'quelqu'un peut-il corriger mon ou plutôt mes erreurs ??

Dim Fichier As String
Dim x As String

x = Sheets("sipac").Range("a20").Value

Bonjour à tous,

par Vba, je peux récupérer dans une variable un numéro de fax que
j'aimerais coller dans le presse papier afin de pouvoir le coller dans
la boîte de dialogue d'envoi du fax. Mais comment faire ?

Merci d'avance à qui me mettra sur la voie.

Jac

Bonjour à tous,

je voudrais appeler depuis le vba la fenêtre de dialogue "Imprimer" que
j'obtiens avec CTRL+p ou par menu : Fichier / Imprimer.

En m'inspirant de l'aide, ça devrait ressembler à
SendKeys "^(p)" ou Application.SendKeys "^(p)"
mais je n'obtiens aucune ouverture de fenêtre.

Merci d'avance à qui me mettra sur la voie.

Jac

Bonjour
en suivant les conseils de divers posts j'ai voulu utiliser la
fonction datedif mais celle-ci me retourne des résultats surprenants
ainsi =datedif("31/1/2008";"1/3/2009";"md") retourne : -2
soit un nombre négatif
comment est-ce possible; la fonction est elle buggée?
est-ce que cette fonction est incompatible avec excel 2000??

Bonjour,

Bienvenue sur le groupe de discussion Excel (microsoft.public.fr.excel)

ATTENTION ! Ceci est un groupe de discussion entre utilisateurs : les personnes répondant ici sont tous des utilisateurs bénévoles qui donnent
de leur temps pour vous aider à résoudre les problèmes rencontrés dans l’utilisation des produits et technologies Microsoft.
« Bonjour » et « Merci ! » sont leurs seules récompenses pour le temps qu’ils vous consacrent. Pensez-y !

----------------------------------------------------------------------------------------------------------

IMPORTANT ! Pour éviter de recevoir des messages indésirables ("Spam") sur votre compte de messagerie, nous vous conseillons de ne pas utiliser ce dernier lorsque vous posez une question ou que vous répondez dans un newsgroup. Voici 2 principes de base pour vous prémunir du spam :

1. Modifier légèrement votre adresse de messagerie réelle de sorte que les autres utilisateurs puissent vous envoyer un message sans que les outils de Spam (robots) ne la récupèrent automatiquement. Par exemple, si votre adresse email réelle est "nom-email@fournisseurinternet.com", vous pouvez utiliser "nom-email(supprimerceci)@fournisseurinternet.com" comme adresse email modifiée.
2. Utiliser un compte de messagerie secondaire - Créer et utiliser un compte de messagerie secondaire séparé de votre messagerie habituelle pour poser des questions ou répondre dans les newsgroups.

----------------------------------------------------------------------------------------------------------

C’est votre première visite ? Voici le B-A-BA de l’utilisateur des newsgroups !
Avant de se lancer dans un groupe de discussion, il est recommandé d’observer ceux qui l'utilisent et d’effectuer une recherche...

Bonsoir
Je reviens sur la macro ci dessous elle recopie autant de fois que d'onglet
les infos de
l'onglet actif. je cherche mais ne sait pas faire

Daniel. C m'a gentillement répondu ""Il faut qualifier les plages que tu
copies; si tu mets seulement "Range" oou
"Cells", tu copies les plages de la feuille active :""

le "s" doit correspondre au différent onglet, mais voilà je ne comprend pas
ce qu'il fait faire

merci de votre aide

Sub CopieFeuille()
Dim lgn1, lgn2, lgn3, lgn4 As Long
Sheets("recap").[A1].CurrentRegion.Offset(1, 0).Clear

For s = 2 To Sheets.Count

On Error Resume Next
lgn1 = Sheets(s).Columns("B:B").Find(What:="fabrication").Row + 4

Bonjour

je souhaiterais tester si la valeur i appartient au groupe de chiffres
1;4;7;9;21;144
une solution est passer par if i=1 or ... mais trop long si beaucoup de
chiffres,
une solution serait de ranger les chiffres dans un tableau et de faire un
test chiffre par chiffre, mais je me demandais si il n'y avait pas une
instruction générique du type

if i = [1;4;9;21;144] then ...

merci de vos propositions, si il y a

seb

bonjour,

j'ai un souci avec la formule sommeprod, elle affiche des zeros que je ne
désire pas et surtout que je ne comprend pas.je ne sais pas comment formuler
pour les faire disparaitre...
j'ai repris dans un exemple des joueurs de foot et oui pourquoi pas !! qui
joue certains jours et d'autre pas.
le soucis est que même lorsqu'ils ne jouent pas, ils marquent 0 buts.
le fichier ci dessous
http://cjoint.com/?fbtB4yamGy

quelqu'un peut il m'aider ??.

Bonjour,
Je ne sais pas si quelqu'un peut m'aider mais voici mon problème
J'ai un classeur excel de X feuilles (environ une centaine)
Chaque feuille porte un numéro, un numéro par élève
Sur toutes les feuilles de ce classeur : en L2, j'aurai une valeur
correspondant à la moyenne finale totale de mon élève, au fur et à mesure de
l'incrémentation de ses notes.
Pour tout ça : pas de problème
J'ai une macro qui peut m'insérer une feuille récapitulative de toutes les
données de mes feuilles à un instant t.
1ere colonne : lien hypertexte avec le N° de l'élève et lien direct sur sa
feuille
Ca, c'est bon !
Mais je souhaiterai aller plus loin : j'aimerai, à côté du lien de l'élève,
avoir sa moyenne (en L2), mais une moyenne que je peux voir évoluer au fur et
à mesure de l'incrémentation des notes.
Avec ma macro, je ne peux que faire une "photographie" à un moment !
Bien sûr, je pourrai écrire dans la case ='1'!L2 pour l'élève N°1, puis
='2'!L2 pour l'élève 2,... mais très fastidieux quand on a plus d'une
centaine de feuilles (et que je refais la manip dans plusieurs classeurs!!!) ...

Merci à Daniel M d'avoir répondu en novembre 2004 à une question sur les
recherches multi critères,réponse dont je viens de m'inspirer:
=INDEX(Feuilentree!$G$50:$G$5000;EQUIV(1;(prod_type_uti_annee="semence")*(Feuilentree!$C$50:$C$5000=Feuil2!C34);0)).
C'est pour vous tout simple mais avec un exemple pour se guider c'est plus
facile.

Et merci au autres pour leurs participations avec leurs réponses et leurs
jovials commentaires. Au fait, que deviens JPS qui mettait toujours de la
bonne humeur sur ce forum ??