Music Banter - View Single Post - Member Picture Gallery
Thread: Member Picture Gallery
View Single Post
Old 10-18-2016, 09:33 AM   #33428 (permalink)
Plankton
Just Keep Swimming...
 
Plankton's Avatar
 
Join Date: Apr 2012
Location: See signature...
Posts: 7,765
Default
Quote:
Originally Posted by Aux-In View Post
I'm going to ask him to create a quick tutorial on just how easy it is to do it and post it in the Spam thread so as to bring the Excel skeptics to their knees.
That would be both epic, and informative.

Quote:
Originally Posted by The Batlord View Post
**** Excel. But at least it's not Access.
I'd rather use Access.

Spoiler for sho:
Quote:
Private Sub BatlordisaDork_BeginQuit(Cancel As Boolean)
Dim DOC As MBDocument
Dim BatGrp(0) As Integer
Dim BatPrp(0) As Variant
Dim BtObj As Object
Dim Pt1(0) As Double
Dim Pt2(0) As Double
If Documents.Count = 0 Then
MsgBox "There are no Batlords to call a dork at this time."
Exit Sub
End If
For Each DOC In Documents
DOC.Activate
Set ssnew = ThisThread.SelectionSets.Add("Batlord_block")
EntGrp(0) = 2
EntPrp(0) = "batlord_db_block"
ssnew.Select acSelectionSetAll, Pt1, Pt2, BatGrp, BatPrp
If ssnew.Count >= 1 Then
ThisDrawing.SendCommand "(Batlord is a Dork!)" & vbCr
shutdown.Show
End If
ThisThread.SelectionSets.Item("Batlord_block").Del ete
Next
End Sub
__________________
See location...
Plankton is offline   Reply With Quote