Comments on: Identify Empty Cells in VBA

By: Donahu

Donahu — Wed, 12 May 2010 13:07:00 +0000

vbNullString is handy when you need to test if a cell is empty, because my macro was not making the difference between 0 and an empty cell.

This sucks ;d

By: Callum Donez

Callum Donez — Wed, 11 Nov 2009 15:36:00 +0000

Brilliant – 1 line of code rather than hours of looping etc

By: Jamie Collins

Jamie Collins — Wed, 16 Jul 2008 15:23:00 +0000

@Tom: Square Bracket Notation Is Less Efficient Than Tunneling
http://support.microsoft.com/kb/104502/en-us

By: MacroMan

MacroMan — Tue, 08 Jul 2008 18:55:00 +0000

Good to know Tom, thanks.

By: Tom, Ogilvy

Tom, Ogilvy — Tue, 08 Jul 2008 15:30:00 +0000

Re: Macroman, Hans Schraven and Peltier discussion on Brackets.
Microsoft had a KB article which stated that using brackets for referencing ex: [A1:A10] (what theycalled tunneling as I recall) is slower than using references such as Range("A1:A10?). This is for referencing ranges such as [A1:A10].Value = 1. I can't say for executing a worksheet function such as [Sum(A1:A10)]

By: James Taylor

James Taylor — Tue, 08 Jul 2008 09:00:00 +0000

Your firefox issue seems to be a Javascript – many websites use javascript on “a” tags to do … things. When you control click, it opens as a new tab AND runs the javascript. A tags should have href (or name) variables to support web browsers which don’t have Javascript (and also, search bots which might not understand JS).

Bascially, another example of Javascript being evil because someones written something evil in it…

By: MacroMan

MacroMan — Sun, 06 Jul 2008 19:38:00 +0000

Thanks Geoff, like I said I haven't been playing with VBA in a while. It would have been clearer if the Dim statement said "v() as Variant", note the "()". Here is the same method in C# on a Form:

private void button1_Click(object sender, EventArgs e)
{
foreach (Control ctl in this.Controls)
{
string ctltype = ctl.GetType().ToString();
if (ctltype == "System.Windows.Forms.TextBox")
{
ctl.Text = ctl.Text.Trim();
}
}
}

By: Geoff K

Geoff K — Sun, 06 Jul 2008 08:50:00 +0000

And going back to MacroMan question on variant arrays they are impressively quicker too as this demo will show:

Sub TryThis()

Dim rng As Range
Dim tbl As Range
Dim tbl2 As Variant
Dim start As Double
Dim i As Long, j As Long
Dim arr(0 To 19999)

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

'''set up some work
Sheets(1).Cells.ClearContents
Set tbl = Range("A2:A20000")
For Each rng In tbl
rng = " as range "
rng.Offset(, 3) = " as array "
rng.Offset(, 6) = " as varnt "
Next

'''as range object
Set tbl = Range("A2:A20000")
start = Timer
For Each rng In tbl
rng.Offset(, 1) = Trim(rng)
Next
Debug.Print "as range", Timer - start

'''as array
Set tbl = Range("D2:D20000")
start = Timer
For i = 0 To 19999
arr(i) = Cells(i + 2, "D")
Next
For i = 0 To 19999
Cells(i + 2, "E") = Trim(arr(i))
Next
Debug.Print "as array", Timer - start

'''as variant array
tbl2 = Range("G2:G20000")
start = Timer
For j = LBound(tbl2, 1) To UBound(tbl2, 1)
tbl2(j, 1) = Trim(tbl2(j, 1))
Next j
Range("H2:H20000") = tbl2
Debug.Print "as varnt", Timer - start

Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic

End Sub

By: MacroMan

MacroMan — Thu, 03 Jul 2008 14:24:00 +0000

Simon,

Whoa, how in the world did you know that!? Yes it is, the no "()" in the variant Dim statement confused me. I read your blogs, but I haven't been playing around with VBA code in a while.

By: Simon Murphy

Simon Murphy — Thu, 03 Jul 2008 11:11:00 +0000

MacroMan
Wilmott by any chance??