(trilingal, I am, yeeeeeees.)

Option Explicit

Public Sub createSql()
Dim i As Integer
Dim strTemp As String
Dim strCname As String
Dim strUserName As String

For i = 2 To 65

strCname = Cells(i, 1).Value
strUserName = Cells(i, 2).Value
'insanely important IP removed.
strTemp = strTemp & f(strCname, strUserName)

Next i
frmTemp.txtCode.Text = strTemp
End Sub

Yes, yes, I already knew all this, but if you only use Cells(rows, columns) once every three or four years, it's good to have a refresher.

Labels: , , ,