Skip to content

Instantly share code, notes, and snippets.

@youcune

youcune/push.bas

Created April 20, 2013 07:13
Show Gist options
  • Save youcune/5425108 to your computer and use it in GitHub Desktop.
Save youcune/5425108 to your computer and use it in GitHub Desktop.
Download ZIP
Variant型の配列に要素を追加するVBA
Raw
push.bas
' Variant型の配列に要素を追加する
Sub Push(ByRef v As Variant, e)
ReDim Preserve v(UBound(v) + 1)
v(UBound(v)) = e
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment