Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk - od firmy Arkance Systems [www.cadforum.cz]
CZ | SK | EN | DE
Přihlášení
či registrace
   právě nás čte: 8857 
Arkance Systems CZ
FB TW YT LN Blog
PORTÁLY PRODUKTŮ
AutoCAD AutoCAD a LT
Inventor Inventor
Revit Revit
Civil 3D Civil 3D
Fusion 360 Fusion 360
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

 

NápovědaCAD diskuze, rady, výměna zkušeností

 
CAD Fórum - Homepage Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi. Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy Arkance Systems (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.cadstudio.cz
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenoGetEntity vo VBA
 Odpovědět Odpovědět archiv
Autor
  Najít Téma Najít Téma  Možnosti tématu Možnosti tématu
Sirus Zobrazit panel
Nováček
Nováček

Přihlášen: 27.čvc.2005
Lokalita: Slovensko
Stav: Offline
Bodů: 11
 Přímý odkaz na tuto zprávu Téma: GetEntity vo VBA
    Zasláno: 24.led.2006 v 08:53
Dobry den,

mam maly problem s VBA. Pokusam sa vybrat entitu (typu Mtext) ale program hlasi "ByRef argument mismatch". Pritom je to opisane z helpu ku GetEntity. Vie niekdo, kde je chyba?

A samotna funkcia:

Private Sub CommandButton1_Click()
Dim returnObj, returnObj2 As AcadMText
Dim basePnt, Pnt1, xx As Variant
zarovnanie.Hide
ThisDrawing.Utility.GetEntity returnObj, basePnt, "Vyber prvy text"
Pnt1 = returnObj.InsertionPoint
If vlavo.Value = True Then
 xx = Pnt1.X
End If
ThisDrawing.Utility.GetEntity returnObj2, basePnt, "Vyber druhy text"
returnObj2.InsetrionPoint.X = xx
returnObj2.Update
End Sub
Zpět nahoru
dazky Zobrazit panel
Nováček
Nováček

Přihlášen: 29.lis.2004
Stav: Offline
Bodů: 5
 Přímý odkaz na tuto zprávu Zasláno: 24.led.2006 v 13:09
zkuste
v druhem radku: Dim returnObj As AcadMText, returnObj2 As AcadMText
objekt musi byt typ "AcadEntity", nemuze byt "Variant"
David
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 9321:VIPNefunguje mi VBA v Inventoru 2016, 2015, 2014 nebo 2013 - příčiny.
Tip 6790:VIPPřidání ikony vlastního příkazu/makra v Inventoru.
Tip 6490:VIPVBA aplikace v 64bitové verzi AutoCADu (kompatibilita, migrace)
Tip 97:Přepínání mezi překrývajícími se výřezy.
Tip 7247:Chyba C0000005 v AcVBA.arx při pokusu o spuštění VBA makra.
Tip 6603:V AutoCADu 2010 mi nejde načíst VBA aplikace (.DVB)


 Odpovědět Odpovědět

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 0,609 sekund.
CF
CAD Fórum - tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion 360 a další Autodesk aplikace (support firmy Arkance Systems)
ARKANCE (CAD Studio) - Autodesk Platinum Partner & Training Center & Services Partner
KONTAKT:
webmaster.cz@arkance-systems.com
tel. +420 910 970 111
  Copyright ©2024 | Web reklama na tomto serveru | Ochrana soukromí, podmínky
FB TW YT LN Blog
TOPlist
img