Discussion :

[jihemel34]

Bonjour à chacun
Depuis quelques jours, j'apprends à utiliser ADO en EXCEL VBA. J'arrive très bien à lire dans mon classeur et à récupérer les données. Par contre, dès que je tente un INSERT, j'ai le message "L'opération doit utiliser une requête qui peut être mise à jour". J'ai beaucoup fouillé sur Internet et n'ai rien trouvé de satisfaisant, à part que ça pourrait être un problème d'autorisations, mais mes fichiers se trouvent sur mon NAS, et je suis administrateur partout... D'ailleurs, j'ai fait un essai en les mettant sur mon ordinateur, et ça ne change rien.
Voici le code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
Dim ConnexionDonnees As ADODB.Connection     'Connexion au classeur des données
 
   Set ConnexionDonnees = New ADODB.Connection
    With ConnexionDonnees
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
            & FichierDonnees & ";Extended Properties=""Excel 12.0 Xml;IMEX=1;HDR=YES;ReadOnly=False;"""
        .Open
    End With
 
Set Commande = New ADODB.Command
Set Enregistrements = New ADODB.Recordset
 
Requete = "INSERT INTO [Ecritures$] (Cle, NumCpt) VALUES (17, 1)"
 
With Commande
    .ActiveConnection = ConnexionDonnees
    .CommandType = adCmdText
    .CommandText = Requete
    .Execute
End With
Command.Close
Set Command = Nothing
Set Enregistrements = Nothing
 
'On ferme la connection aux données
    ConnexionDonnees.Close
    Set ConnexionDonnees = Nothing

Merci à ceux qui pourront m'aider !

[Thumb down]

Bonjour,
MEX=1 converti tous les champs au format texte, en revanche la table devient en lecture seule !

Il faut supprimer MEX=1; de ta chaîne de connexion si tu veux faire de l'insert ou update.

[jihemel34]

C'est génial d'avoir aussi rapidement la bonne solution !

Merci

[Pierre Fauconnier]

Salut.

Je pense qu'il y a mieux à faire qu'apprendre à utliser ADO avec Excel. Excel n'étant pas un SGBD (système de gestion de base de données), les limites sont vite atteintes.

Quelle est ton utilisation d'Excel qui nécessite de manipuler Excel par ADO?

[jihemel34]

Oui, Pierre, je suis convaincu de ce que tu me dis.
Mais je t'explique:
J'ai plus de 70 ans. J'ai programmé en Assembleur, en Fortran, en Algol, en PL1, en COBOL, en Basic, en VBA (ACCESS), un peu en PHP, etc.
Outre Access, j'ai utilisé des SGBD relationnels sur des gros systèmes, et aussi un peu MySQL.

Aujourd'hui, je m'amuse à réaliser une petite application pour gérer ma comptabilité familiale. J'ai Office 365, et je n'ai pas envie d'investir dans autre chose.
J'ai commencé, il y a une quinzaine de jours, à m'intéresser aux tableaux structurés (ListObject) suite à une recherche sur Internet. Et puis mes recherches m'ont mené vers DAO, et je crois bien que c'est toi qui m'a conseillé d'utiliser plutôt ADO.

Et, depuis hier, je m'intéresse à la programmation objet, dont j'ai tout juste entendu parler, mais je pense que je vais m'y mettre. Mes classes utiliseront ADO.

J'ai regardé un peu Power Query, mais ça ne m'a pas donné envie de m'y mettre. Trop "Microsoft" à mon goût.

En tout cas, merci pour ton aide et tes conseils, que je suivrais de près si j'avais ne serait-ce que 20 ans de moins.

Voilà. Le vétéran a parlé.

PS : quand je me présente comme assistant à maîtrise d'ouvrage, c'est la vérité; c'est ce que je faisais à la fin de ma vie professionnelle; j'étais consultant, spécialisé dans la conduite du changement de système d'information.

[Pierre Fauconnier]

Salut Jihemel,

Si tu t'amuses, c'est autre chose et on peut alors s'amuser ensemble

[jihemel34]

Et à ta phrase de Voltaire, à laquelle j'adhère, je réponds par une phrase d'Isaac Newton:
"Les hommes construisent trop de murs et pas assez de ponts."

[Pierre Fauconnier]

Me demande s'il y a un message caché derrière ...

[jihemel34]

Pas du tout.
Cette citation fait partie de la signature de mes mails, en une quinzaine de langues différentes...