> Tous les forums > Forum Bureautique
 Mise à jour fonction VBA excelSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Porruak
  Posté le 08/03/2012 @ 17:58 
Aller en bas de la page 
Petit astucien

Bonjour,

Dans un classeur, certaine cellule sont calculées à partir d'une fonction VBA.

exemple :

Function R_Title() As String
R_Title = ActiveWorkbook.BuiltinDocumentProperties("Title")
End Function

avec dans la cellule "=R_Title()"

Mais voila lorsque la valeur de Title change la cellule n'est pas recalculée même en faisant F9 ou calculé maintenant.

j'ai bien intégrer une sub sous la feuille de calcul, ci dessous:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.Calculate
End Sub

mais même avec cette sub pas de régénération de la feuille (en fait lors du premier changment sa fonctionne mais pas aprés)

est ce qu'il y aurait une manip à réaliser pour que toutes les cellules avec des fonctions VBA se remette à jour (au chargement par exemple) automtiquement.

Merci pour votre aide.

Publicité
galopin01
 Posté le 08/03/2012 à 19:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

Pour les fonctions personnalisées mettre Application.Volatile au début de la fonction :

Function R_Title() As String
Application.Volatile
R_Title = ActiveWorkbook.BuiltinDocumentProperties("Title")
End Function

Nota : Il n'est pas utile de mettre un Calculate sur Worksheet_Change puisque la fonction est rafraichie automatiquement à chaque changement...

A+

Porruak
 Posté le 09/03/2012 à 09:10 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Excellent, sa fonctionne parfaitement. Merci beaucoup Galopin01.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
Ecran ultra large LG 29 pouces 29WL50S-B à 199,99 €
199,99 € 229,99 € -13% @Amazon

Amazon propose actuellement l'écran 29 pouces LG 29WL50S-B à 199,99 € livré gratuitement alors qu'on le trouve à partir de 229 € ailleurs. Cet écran ultra large est au format 21/9, possède une dalle IPS et offre une résolution de 2560 x 1080 pixels. Avec lui, vous pourrez bénéficier d'une plus grande immersion dans les jeux et les films. Cet écran est compatible FreeSync. 


Voir le bon plan
SSD Lexar NM610PRO 2 To (3D NAND, NVMe, PCIe, M.2, 3300 Mo/s) à 99,99 €
99,99 € 130 € -23% @Amazon

Amazon fait une promotion sur le SSDLexar NM610PRO 2 To (3D NAND, NVMe, PCIe, M.2) qui passe à 99,99 €. On le trouve ailleurs à partir de 130 €. Ce SSD offre des vitesses de lecture/écriture séquentielle allant jusqu’à 3 300/ 2 600 Mo/s. Il est garanti 3 ans.


Voir le bon plan
Ecran 27 pouces incurvé KTC H27S17 (QHD, 165 Hz, 1 ms, HDR10) à 209,64 €
209,64 € 300 € -30% @Geekbuying

Geekbuying fait une promotion sur le tout nouvel écran 27 pouces incurvé KTC H27S17 qui passe à 219 € avec le code promo NNNKTCH27S17 au lieu de 300 €. En payant par Paypal, vous obtiendrez 10$ (9,36 €) de remise supplémentaire, faisant passer le prix total à 209,64 € ! Cet écran incurvé (courbure 1500R) possède une dalle QHD 2560x1440 à 165 Hz, offre un temps de réponse de 1 ms et est compatible FreeSync et GSync. Connectique : 2xHDMI, 2xDP. 

L'envoi se fait depuis un entrepôt européen. Vous êtes ainsi certains de recevoir l'écran rapidement et sans douane.


Voir le bon plan
Tour PC Lenovo IdeaCentre G5 (Core i5-11400F, 16 Go RAM, SSD 512 Go, GeForce RTX 3060 12Go) à 699,99 €
699,99 € 929,99 € -25% @Cdiscount

CDiscount fait une promotion sur la tour PC IdeaCentre G5 à 699,99 € avec le code STAR50LEN alors qu'on la trouve habituellement à 929 €. Cette tour très bien équipée possède un processeur Intel Core i5-11400F, 16 Go de RAM DDR4 3200 MHz (extensible à 32 Go), un SSD NVMe M.2 de 512 Go et une carte graphique GeForce RTX 3060 12 Go. Un clavier et une souris sont également fournis.

Une bonne affaire pour un PC qui sera à l'aise dans toutes les situations et tous les jeux.


Voir le bon plan
-15 € dès 99 € chez Rakuten
-15 € @Rakuten

Rakuten offre aujourd'hui 15 € de réduction dès 99 € d'achats avec le code RAKUTEN15

Sachant que des boutiques françaises comme BoulangerCdiscountUbaldi ou encore Samsung vendent sur Rakuten aux mêmes conditions que dans leurs magasins, cela peut être intéressant.


Voir le bon plan
TV QLED 50 pouces Samsung The Frame 4K UHD à 629 €
629 € 999 € -37% @RueDuCommerce

RueDuCommerce fait une belle promotion sur la TV QLED 55 pouces (125 cm) Samsung The Frame QE55LS03AA qui passe à 629 €. On la trouve ailleurs à partie de 999 €. Cette smart TV QLED 4K est tellement fine que vous pouvez l'utiliser comme tableau pour afficher vos oeuvres d'art préférées.


Voir le bon plan

Sujets relatifs
Supprimer la confirmation de mise à jour des liens avec Excel
Mise à jour des liaisons Excel dans un PPS
mise a jour devises dans excel
Excel 2003 Mise à jour automatique depuis PHP
importation / mise a jour table de excel -> acces
mise a jour pour excel
mise a jour excel impossible
Mise à jour de données Excel
Echec de la Mise à Jour Excel Viever ????
date de mise a jour dans Excel
Plus de sujets relatifs à Mise à jour fonction VBA excel
 > Tous les forums > Forum Bureautique