编写VBA宏是根据与先前单元格值组合的单元格值插入一行

Question

我正在尝试编写宏以在单元格中的值（即：A2）小于先前单元格值（即：A2）时插入行。我目前的工作原理是什么，但是然后每隔一行插入一行。任何帮助将不胜感激：

        synchronized (map) {
            for (Map.Entry<String, String> stringStringEntry : map.entrySet()) {
                System.out.println("after iterator");
                try {
                    Thread.sleep(1000);
                } catch (InterruptedException e) {
                    e.printStackTrace();
                }

            }
         }