How to open multiple KML-files

[Paul85]

Hello everyone,

It's been a long time since I was active here. I usually used VBA for projects at work but after a few switches I'm now back again to automate things.

Project:
I have a Userform with multiple tools for calculations etc for the airline I'm working for. I'd like to give users the ability to plot the routes in Google Earth that are stored as *.kml files.

Problem:
The routes have the format depdest**.kml where dep = departure station and dest = arrival/destination station. Amsterdam to Madrid looks like AMSMAD01.kml.
But there is more than 1 route available... 01-09 (normal routes) and 31-34 (contingency routes) and 90-94 (special used routes).
I am able to let the user open 1 route (AMSMAD01.kml) but it seems impossible to me to get this in a loop to check for all files beginning with AMSMAD. Preferably AMSMAD01 till AMSMAD99. I have found many codes on the internet and I combined them the best I could but still no multiple routes in Google Earth.

The user has 2 textboxes. The first is to enter the departure station (GC_Pred_dep) and the 2nd is for the arrival station (GC_Pred_dest).
1.png

I created the following code. Is anyone able to solve this mystery? Any help is much appreciated!
EDIT: Google Earth does open en it also opens 1 or 2 routes, but not all. And I suspect that the amount of errors I get when executing the code are equal to the amount of routes that don't show up.
2.png

Please Login or Register  to view this content.

[Paul85]

For those who would like to know the same, I got the answer.

Because of the many .kml-files to be opened at once, I had to add Application.Wait to the code.

Please Login or Register  to view this content.

Because of the slow pc's at work I had to put the value at 6 seconds. Now Google Earth is starting first and after 6 seconds the .kml-files will be loaded. Problem solved!