IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Visual Studio Discussion :

Insérer une formule dans Excel - Exception de HRESULT : 0x800A03EC


Sujet :

Visual Studio

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    95
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Décembre 2009
    Messages : 95
    Par défaut Insérer une formule dans Excel - Exception de HRESULT : 0x800A03EC
    Bonjour,

    Je dois modifier plusieurs milliers de fichiers Excel. Pour cela je dois insérer des formules.

    Bizarrement, ça fonctionne pour certaines et pas pour d'autres.

    Par exemple ceci fonctionne parfaitement.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    oSheet.Cells[47, 15] = "=M45";
    Ca aussi, mais j'ai dû changer le format de la cellule sinon je voyais la formule et pas son résultat.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     Excel.Range range = oSheet.get_Range("L51","L55");
                range.NumberFormat = "0";
                oSheet.Cells[51, 12] = "=\"(\"&o47+1&\")\"";
                oSheet.Cells[53, 12] = "=\"(\"&o47+2&\")\"";
                oSheet.Cells[55, 12] = "=\"(\"&o47+3&\")\"";
    Par contre, ceci me donne ce message d'erreur : Exception de HRESULT : 0x800A03EC
    J'ai fait des recherches, des recherches et je ne trouve pas le problème.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
                range = oSheet.get_Range("k51", "k55");
                range.Clear();
                range.NumberFormat = "dd/mm/yyyy";
                oSheet.Range["K51"].Value2 = "=DATE(ANNEE(M47)+2;MOIS(M47);JOUR(M47))";
                //oSheet.Cells[51, 11] = "=DATE(ANNEE(M47)+2;MOIS(M47);JOUR(M47))";
                oSheet.Cells[53, 11] = "=DATE(ANNEE(M47)+2;MOIS(M47);JOUR(M47))";
                oSheet.Cells[55, 11] = "=DATE(ANNEE(M47)+3;MOIS(M47);JOUR(M47))";
    Ca plante systématiquement sur la ligne

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    oSheet.Range["K51"].Value2 = "=DATE(ANNEE(M47)+2;MOIS(M47);JOUR(M47))";
    Ou bien sur celle que j'avais testée auparavant

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    //oSheet.Cells[51, 11] = "=DATE(ANNEE(M47)+2;MOIS(M47);JOUR(M47))";
    Merci pour l'aide.

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    95
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Décembre 2009
    Messages : 95
    Par défaut
    OK, je crois que je ne suis pas au bon endroit, je place le sujet en résolu et je le replace dans un forum plus approprié.

    Merci

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Insérer une formule dans une cellule Excel via VBA
    Par *.Har(d)t dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 19/02/2020, 13h02
  2. [D6] Comment insérer une image dans Excel ?
    Par jstauffer dans le forum API, COM et SDKs
    Réponses: 4
    Dernier message: 30/11/2007, 16h02
  3. Insérer une formule dans une cellule
    Par sam_XIII dans le forum Macros et VBA Excel
    Réponses: 14
    Dernier message: 05/10/2007, 16h47
  4. Insérer une ligne dans Excel
    Par Mihalis dans le forum Delphi
    Réponses: 3
    Dernier message: 30/01/2007, 16h25
  5. [VB6] Insérer une image dans Excel
    Par ShortcutZ dans le forum VB 6 et antérieur
    Réponses: 9
    Dernier message: 20/04/2006, 15h39

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo