A4セルにSQLを貼り付けてFormatボタンをクリックするとB4セルに整形後のSQLが出力されます。 Sub ButtonClick() Dim sql As String sql = Range("A4").Value sql = EmptyReplace(sql) sql = FormatSQL(sql) Do While InStr(sql, vbCrLf ...
ActiveData assists Visual Basic 5/6 developers in their data application development. It helps you see and edit a DAO or ADO recordset's data, connection properties, recordset properties, and field ...