Bonjour à toutes et à tous!
Débutant dans la programmation VBA, je sollicite votre aide pour l'écriture d'une macro qui cherche du texte et des nombres dans une feuille de calcul Excel et les copie sur une deuxième feuille. Ci-joint un exemple.
- Sur la feuilleEntrée, on peut lire les concentrations, les constantes d'équilibre et les coefficients stœchiométriques dans les blocs colorés.
- La feuilleCalcul résume la forme et l'ordre que doit avoir les données copiées.
La procédure pourrait être le suivant:
Sur la feuilleEntréeVérifier:
Si "Concentration initiale de l'ion libre Xi de la cellule L1Ci" <> "0.000" alors
CopierColler texte Xi dans feuilleCalcul à partir de la colonne3.
[Copier d'abord les ions positifs excepter H+ ensuite les ions négatifs excepter OH- et terminer toujours les deux dernières colonnes par H+ et OH-]
Ensuite pour le bloc LogKf
CompterNombre de Logkf à écrire puis
Ecrire ("LogKf") dans FeuilleCalcul.Cellule(L2C1)
Si Valeurdecellule(LiCi) <> " " alors
CopierColler Valeur "FeuilleEntréecellule LiC3" Dans FeuilleCalcul (LiC2)
CopierColler Coefficient de Xi dans FeuilleCalcul cellule(LiCi)
Bloc pKa
Meme procedure avec ecrire de pKa à la place de LogKf
Bloc pKs
Meme procedure avec ecrire de pKs à la place de LogKf
FinSi
FinSi
J'ai au total près de 2000lignes d'équations et de constantes.
Il semble que c'est possible de faire une base de données Acess. Quelqu'un s'y connaîtrais pour m'aider aussi.
Merci pour votre aide!
Partager