Résultats de la recherche

Bonsoir, Avec une macro excel , j'ouvre un .doc et j'écris au niveau d'un signet ...... Dim DocWord As Word.Document Dim AppWord As Word.Application Set AppWord = New Word.Application Set DocWord = AppWord.Documents.Open("D:\docu.doc") DocWord.Bookmarks("signet1").Range.Text = "blabla"...

Bonjour, J'ai deux pbs : *Je dispose d'une feuille dont le contenu est au format monétaire 2 décimales. Je voudrais (par une macro enregistree ds ce classeur) écrire le contenu de plusieurs cellules dans un document word à differents emplacement repérés par des signets ( ou des champs...

Bonjour, je voudrais insérer dans un signet de docu word le contenu d'une cellule d'un document excel a l'aide de la macro suivante contenu ds un classeur. Sub Essai() 'necessite d'activer la reference Microsoft Word xx.x Object Library Dim DocWord As Word.Document Dim AppWord As...

Bonjour, On trouve pas mal d'infos ( forum ou livre ) sur vba excel, vba word... Existe-il un bouquin (ou un forum) ciblé sur vba et applications office qui traite de la communication entre ces applications ( je voudrais développer des codes qui utilisent a la fois excel, word et peut etre...

Bonsoir, J'ai créé un tableau à l'aide de boucles imbriquées For i = 1 To NB For J = 1 To N(i) For K = 1 To M(i, J) For L = 1 To P(i, J, K) ...écriture de C(i, J, K, L)......... Next L Next K Next J Next i Comme par la suite un pb apparait, j'ai testé juste apres le code...

Bonsoir, Lors de l'utilisation d'une listbox avec un code classique du genre With USF_1.ListBox1 For i = 0 To .ListCount - 1 If .Selected(i) = True Then numero = i End If Next i End With J'ai le message suivant : erreur automation ; l'objet invoqué s'est déconnecté de...

Bonsoir, Je voudrais réécrire le code suivant .. USF_LIBELLE.ListBox1.RowSource = "A1:A10" USF_LIBELLE.ListBox2.RowSource = "B1:B10" USF_LIBELLE.ListBox3.RowSource = "C1:C10" ........... avec une boucle For i = 1 to 10 USF_LIBELLE.Controls("ListBox" &...

Bonsoir , La macro suivante écrit la formule "somme des cellules de A5 à A8" dans la cellule sélectionnée ActiveCell.Formula = "=SUM(A5:A8)" Je voudrais écrire la meme macro avec les cellules Ai et Aj ( somme des cellules de Ai a Aj ) i et j étant variables. Bien sur la macro...

Bonjour, Je voudrais masquer la feuille dans laquelle je reporte mes calculs. Que ce soit par Format Feuille Masquer ou par la propriété Visible de la feuille, ça ne fonctionne pas.Y-a-til une possibilité ? (nono555 avait déja posé la question mais sans réponse ) Merci

Bonjour, Je voudrais copier le contenu du presse papiers ( ça sera a chaque fois qq lignes ) dans une colonne par exemple : 3 lignes sont stockées dans le presse papiers et je veux les coller via une macro en B2,B3,B4. Se posent 2 pbs : - Je ne sais pas utiliser Paste ( une erreur...

Bonsoir, Dans un USF , je lance la procédure synthese en cliquant sur le bouton3 Private Sub CommandButton3_Click() synthese End Sub et ça me donne le message : Erreur de compilation utilisation incorrecte de la propriété l'aide me renvoit sur des histoiresde property ...

Bonsoir, J'ai récupéré un bout decode mais je ne le maitrise pas : je voudrais créer sur une feuille plusieurs graphiques Pour la création degraphiques pas de pb avec un truc du genre ActiveChart.Name = ""graf" ActiveChart.ChartType = xlRadarFilled ActiveChart.SetSourceData...

Bonjour, Je voudrais dans une procédure créer une feuille mais il se peut qu'elle existe déja et donc une erreur apparait. Je voudrais gérer cette erreur. Quelqu'un peut'il m'aider a corriger le code suivant ( je m'y prends certainement mal :( ) car j'ai l'impression qu'il boucle : faut-il...

Bonjour à tous, Je voudrais récupérer la valeur ( False ou True ) d'un bouton de commande Comme je n'y arrive pas j'ai fait l'essai suivant avec un CommandButton1 placé dans l'USF1 : Private Sub CommandButton1_Click() retour = UserForm1.CommandButton1 If retour Then Unload UserForm1...

Bonjour, J'ai un peu de mal a m'y retrouver dans la jungle charts,chartobjets,shapes... Je ne vois pas bien l'arborescence entre les collections, les objets. Merci de m'éclairer un peu ...:cool:

Bonjour, J'ai bcoup de pb avec lesinitialisations des objets contenus dans un USF, par exemple , j'ai dans le module1 tapé For j = 1 To 5 UserForm1.SpinButton1.Value = 1 UserForm1.Show Tableau(j)=qq Next j et dans le USF1 Private Sub SpinButton1_Change() qq =...

Bonjour, Je suis amené a utiliser Excel ET calc d'openoffice. Je viens juste de commencer l'apprentissage de de VBA. Je sais que les macros VBA ne fonctionnent pas avec openoffice mais a votre avis l'apprentissage de oooBasic sera t-il facilité par la connaissance de VBA , l'esprit est-il...

Bonjour, Dans un userForm, j'ai mis une toupie (valeurs de 1 a 5) et une fenetre affichant la valeur, ainsi que 5 fenetres TextBox1,..,Textbox5. Je voudrais selon la valeur de la toupie changer l'affichaged'une fenetre : en clair, si la valeur est 3 , la fenetre TextBox3 va par exemple changer...

Bonjour, Je débute tout juste sur VBA( excel 2003) Dans un Userform, j'ai placé une barre de défilement ,une fenetre texte et un bouton Je voudrais afficher dans la fenetre texte la valeur associée à la barre de défilement : pour cela dans les controles de la fenetre texte et de la barre de...