Contenu récent par badraaliou4

Salut tout le monde, Je veux un code VBA Excel pour exporter un graphique Access au format jpg dans un dossier spécifique de mon choix étant dans Excel. Merci de votre aide

Merci beaucoup ça marche très bien

Salut, J'ai ce code pour importer mes données à partir Access mais le problème est que ma base de données est trop grande et l'importe est lente. si quelqu'un peut m'aider à raccourcir l'exécution de mon code. Merci l'avance Sub ImportDataBase() Dim CheminDB As String Dim Critere As String...

Salut J'ai changer de PC avec le nouveau PC des carreaux s'affichent à la place du séparateur de milliers dans Listbox. Merci de votre aide. En image

Sub Concent() Dim n As Integer Dim EmailGroup As String n = 3 EmailGroup = Sheets("feuil1").Range("a2").Value Do While Sheets("feuil1").Range("a" & n).Value <> "" EmailGroup = EmailGroup & "; " & Sheets("feuil1").Range("a" & n).Value n = n + 1 Loop Sheets("feuil1").Range("a1") = EmailGroup...

C'est le code VBA qui a été généré par chatgpt mais ne marche pas. Je veux un code VBA qui me permet d'ouvrir une application (WhatsApp) installée à partir de Microsoft Store

Merci pour la réponse Le code ouvre Microsoft store mais n'ouvre pas WhatsApp. ID WhatsApp =9NKSQGP7F2NH J'aimerai ouvrir WhatsApp installé à partir de Microsoft store avec le code VBA merci d'avance

Bonjour à tous, Je cherche un code Vba qui me permet d'ouvrir une application installée à partir de Microsoft Store. j'ai généré ce code dans CHATGPT mais ne marche pas. Sub OuvrirApplicationMicrosoftStore() Dim StoreLink As String StoreLink =...

Merci beaucoup ça marche très bien

Salut, je voulais importer des images dans mon userform mais je n'aimerai voir les fichiers JPG et JPEG lors de la selection Le code que j'ai trouvé me mettre de filtre juste un format, JPG ou JPEG Merci de votre aide sub ImportImage() Dim Fichier As Variant Fichier =...

Merci beaucoup ça marche bien

Mon code me permet d'envoyer le message par whatsapp. Je cherche un code qui réduit whatsapp après l'envoie de message Sub cmdSend() Dim IE As Object Dim strPhoneNumber As String ' caisse Dim strMessage As String strPhoneNumber = Sheets("whatsapp").Range("B2").Value strMessage =...

Bonjour à tous et toutes Je souhaite réduire la fenêtre active avec VBA j'ai utilisé code mais ça ne marche pas. sub reduire_fenetre_active() sendkeys "{HOME}{DOWN}" end sub Merci de votre aide

Cette fonction n'a pas marché chez moi j'ai Office 2016

C Bonsoir, Je veux que cet image en pièce jointe n'affiche pas lors de l'ouverture