Objekt i .bas modul

Hvis jeg forstår dig, vil du have en procedure til at udføre en række operationer på et vilkårligt MSComm object.

Du kan overføre objectet som parameter til proceduren :
Sub DoSomething(MyObject As MSComm)
og så lade proceduren arbejde med MyObject.

Jeg forstår hverken spørgsmål eller svar :o)

jeg tror nok det er noget i den stil du mener, her et lille eksempel.

'------------------------- Form1 -------------------------
Option Explicit

Private Sub Form_Load()
'De gør det samme:

  Call SelTextBox1(Text1)
  'eller
  Call SelTextBox2(Text1)
End Sub
'------------------------- Form1 -------------------------

'------------------------ Module1 ------------------------
Option Explicit

'Her fortæller vi at objText er en TextBox
Public Sub SelTextBox1(objText As TextBox)
  objText.SelStart = 0
  objText.SelLength = Len(objText)
End Sub

'Her fortæller vi at objText er et Object
Public Sub SelTextBox2(objText As Object)
  objText.SelStart = 0
  objText.SelLength = Len(objText)
End Sub
'------------------------ Module1 ------------------------

michaelemanuel --> Hvis jeg forstår dig, vil du have en procedure til at udføre en række operationer på et vilkårligt MSComm object.

Det er nemlig rigtigt. Tak for hjælpen, det var lige det jeg manglede. Undskyld til jer andre at det var lidt kringlet formuleret.