Bonjour,

J’aimerai créer un fichier texte de points pour Google Earth à partir d’une table access en y incorporant une fonction si.
Je dois à priori utiliser la fonction printf mais je ne connais pas le VBA. Je suppose qu'après il faut lancer une macro sur le module en VBA.

J'ai 4 variables
Le point : 1,2,3....
Longitude pour chaque point
Latitude pour chaque point
Valeurs : Valeur associé au point

Si ma valeur est inférieure à 70 alors point en rouge
Si ma valeur est entre 80 et 71 alors point en bleu...

Exemple de table
Point Longitude Latitude Valeurs
1 -0.84172 44.79634 74,15
2 -0.84166 44.79634 86,25
3 -0.84159 44.79634 91,2
4 -0.84159 44.79638 96,05
5 -0.84153 44.79633 76,3
.................................

Exemple de code pour Google Earth pour un point. En rouge les valeurs de la table. Pour chaque point il faut tout prendre entre les balises <Document> et </Document>.

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
30
31
32
33
34
<?xml version="1.0" encoding="UTF-8"?>			
<kml xmlns="http://earth.google.com/kml/2.2">				
<Document>						
	<name>Test.kml</name>				
		<Style id="1">				
			<IconStyle>			
				<scale>0.1</scale>		
				<Icon>		
					<href>adresse réseau pour point couleur rouge</href>	
				</Icon>		
			</IconStyle>			
				<LabelStyle>		
					<scale>0</scale>	
				</LabelStyle>		
		</Style>				
		<Placemark>				
			<name>1</name>	
				<Snippet maxLines="0"></Snippet>
		<description>		
			<![CDATA[date<br /><br />	
			<big><b>Informations :</b></big>]]>	
		</description>		

		<styleUrl>#1</styleUrl>		

		<Point>		
			<extrude>1</extrude>	
			<altitudeMode>relativeToGround</altitudeMode>	
				<coordinates>-0.84172,44.79634</coordinates>
	</Point>			
	</Placemark>			
</Document>
</kml>
Si quelqu'un peut m'aider.

Merci d’avance pour votre aide.

Pal.