Have you ever created a query, made copies of it with different WHERE statements, and then made multiple copies of a report based off of those queries. It becomes very difficult to manage if you ever ...
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 ...