Hallo
Voor mijn CnC bank
heb ik een progr. die een HPGL file maakt die er zo uit ziet
N001 test progr.
N002
N003 %
N004 G90
N005 M03
N006 G00 Z1
N007 G00 X0,217 Y1,724
N008 G00 Z
N009 G01 X0,304 Y1,724
N010 G01 X0,261 Y1,724
N011 G01 X0,261 Y1,534
N012 G00 Z1
N013 G00 X0,445 Y1,724
N014 G00 Z
N015 G01 X0,358 Y1,724
N016 G01 X0,358 Y1,534
N017 G01 X0,445 Y1,534
N018 G00 Z1
N019 G00 X0,358 Y1,628
N020 G00 Z
N021 G01 X0,43 Y1,628
N022 G00 Z1
N023 G00 X0,582 Y1,683
N024 G00 Z
N025 G01 X0,58 Y1,692
N026 G01 X0,577 Y1,702
N027 G01 X0,571 Y1,709
N028 G01 X0,564 Y1,717
N029 G01 X0,555 Y1,72
N030 G01 X0,545 Y1,723
N031 G01 X0,535 Y1,723
N032 G01 X0,525 Y1,72
N033 G01 X0,517 Y1,717
N034 G01 X0,509 Y1,709
N035 G01 X0,503 Y1,702
N036 G01 X0,5 Y1,692
N037 G01 X0,498 Y1,683
N038 G01 X0,498 Y1,575
N039 G01 X0,5 Y1,565
N040 G01 X0,503 Y1,556
N041 G01 X0,509 Y1,548
N042 G01 X0,517 Y1,541
N043 G01 X0,525 Y1,536
N044 G01 X0,535 Y1,534
N045 G01 X0,545 Y1,534
N046 G01 X0,555 Y1,536
N047 G01 X0,564 Y1,541
N048 G01 X0,571 Y1,548
N049 G01 X0,577 Y1,556
N050 G01 X0,58 Y1,565
N051 G01 X0,582 Y1,575
N052 G00 Z1
N053 G00 X0,636 Y1,724
N054 G00 Z
X Y zijn de coordinaten
en Z is de Zas om diepte in te geven
Z1 is de hoogte boven het werk stuk bijv. 2 mm
en Z is de diepte bijv. -1,5mm
Nu wil ik in VBA
Z wijzigen in Z2
en Z1 wijzigen in Z-1,5
dit lukt mij niet omdat als ik de file in VBA binnen haal
dan komt de gehele tekst in 1 kolom binnen
Tja dan kan ik er niks mee
wie weet de oplossing
Hans
Voor mijn CnC bank
heb ik een progr. die een HPGL file maakt die er zo uit ziet
N001 test progr.
N002
N003 %
N004 G90
N005 M03
N006 G00 Z1
N007 G00 X0,217 Y1,724
N008 G00 Z
N009 G01 X0,304 Y1,724
N010 G01 X0,261 Y1,724
N011 G01 X0,261 Y1,534
N012 G00 Z1
N013 G00 X0,445 Y1,724
N014 G00 Z
N015 G01 X0,358 Y1,724
N016 G01 X0,358 Y1,534
N017 G01 X0,445 Y1,534
N018 G00 Z1
N019 G00 X0,358 Y1,628
N020 G00 Z
N021 G01 X0,43 Y1,628
N022 G00 Z1
N023 G00 X0,582 Y1,683
N024 G00 Z
N025 G01 X0,58 Y1,692
N026 G01 X0,577 Y1,702
N027 G01 X0,571 Y1,709
N028 G01 X0,564 Y1,717
N029 G01 X0,555 Y1,72
N030 G01 X0,545 Y1,723
N031 G01 X0,535 Y1,723
N032 G01 X0,525 Y1,72
N033 G01 X0,517 Y1,717
N034 G01 X0,509 Y1,709
N035 G01 X0,503 Y1,702
N036 G01 X0,5 Y1,692
N037 G01 X0,498 Y1,683
N038 G01 X0,498 Y1,575
N039 G01 X0,5 Y1,565
N040 G01 X0,503 Y1,556
N041 G01 X0,509 Y1,548
N042 G01 X0,517 Y1,541
N043 G01 X0,525 Y1,536
N044 G01 X0,535 Y1,534
N045 G01 X0,545 Y1,534
N046 G01 X0,555 Y1,536
N047 G01 X0,564 Y1,541
N048 G01 X0,571 Y1,548
N049 G01 X0,577 Y1,556
N050 G01 X0,58 Y1,565
N051 G01 X0,582 Y1,575
N052 G00 Z1
N053 G00 X0,636 Y1,724
N054 G00 Z
X Y zijn de coordinaten
en Z is de Zas om diepte in te geven
Z1 is de hoogte boven het werk stuk bijv. 2 mm
en Z is de diepte bijv. -1,5mm
Nu wil ik in VBA
Z wijzigen in Z2
en Z1 wijzigen in Z-1,5
dit lukt mij niet omdat als ik de file in VBA binnen haal
dan komt de gehele tekst in 1 kolom binnen
Tja dan kan ik er niks mee
wie weet de oplossing
Hans
Laatst bewerkt: