GoldenLine
Zaloguj się

konto usunięte

Temat: Zliczanie Pól do pliku excell

Witam,
poszukuje sposobu w micro lub aplikacji MDL na przerzucenie pomiarów pól do pliku excell, tzn jezeli kliknę na daną powierzchnie aby pole powierzchni wpisywało się w komórkę excell :)

Pozdrawiam
Adam
Link do wypowiedziLink
Adam Wieczorek

Adam Wieczorek Projektowanie dróg,
szkolenia Inroads.

Temat: Zliczanie Pól do pliku excell

Cześć,

Kiedyś szukałem czegoś podobnego. Jedyne co znalazłem to FlexiTable. Robi dokadnie to, czego oczekujesz i sporo więcej. (http://www.la-solutions.co.uk) zapytaj o demo.
Możesz też poszukać po sieci darmowej aplikacji mdl "atool" co prawda tylko opisuje pole powierzchni, ale to już coś.

Pozdrawiam,

Adam
Link do wypowiedziLink
Karol Stachura

Karol Stachura Nie ma na świecie
rzeczy niemożliwych
- są tylko mało
pra...

Temat: Zliczanie Pól do pliku excell

Poniżej skrypt w VBA zrzucający współrzędne centroidów z powierzchniami zaznaczonych zamkniętych obszarów do pliku o nazwie <nazwa_dgn>_area.txt

Sub powierzchnie()
Dim oelement As Element
Dim oscan As ElementEnumerator
Open Left$(MicroStationDGN.ActiveDesignFile.FullName, Len(MicroStationDGN.ActiveDesignFile.FullName) - 4) + "_area.txt" For Output As #1
Set oscan = MicroStationDGN.ActiveModelReference.GetSelectedElements
Do While oscan.MoveNext
If oscan.Current.IsClosedElement Then
Print #1, oscan.Current.AsClosedElement.Centroid.X & vbTab & oscan.Current.AsClosedElement.Centroid.Y & vbTab & oscan.Current.AsClosedElement.Area
End If
Loop
Close #1
End Sub
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy





Wyślij zaproszenie do
Anuluj