user471929's questions

对于我的任务，我需要通过 Excel 使用 VBA 在 Word 文档中创建多个表格。这是我的代码

sub mainProcedure
    Dim wApp As word.Application
    Set wApp = createWordApplication
    Dim wDoc As word.Document
    Set wDoc = wApp.Documents.Add
    Call createTables(wDoc, wApp)
end sub

sub createTables(wDoc as word.document, wApp as word.application)
dim table as word.table
'!!!
Set table = wDoc.Tables.Add(wDoc.Range(0, 0), 5, 5) 'Вот здесь и вся проблема. Помогите решить
'!!!
'Пробовал делать ещё таким образом
'set table = wDoc.Tables.add(wApp.Selection.Range,5,5)
table.Borders.enable = True
end sub

Function createWordApplication() As word.Application
    Dim wApp As New word.Application
    wApp.visible = True
    Set createWordApplication = wApp
End Function

问题是什么：问题是，当执行带有表创建代码的行时（set table = wDoc.Tables.add(wDoc.Range(0,0),5,5)），第二个表创建在第一列已经存在的表的第一列。也就是说，创建第一个表并向其中输入数据。但是，当在此 wDoc 中创建另一个表时，它不会作为现有表下方的一行插入，而是直接插入到现有表本身中。我相信这与范围有关。我在调试过程中尝试了不同的方式，但没有任何效果。告诉我，如何确保新表格插入到文档末尾？ 到目前为止，我已经通过创建多个与之关联的 wApp 和 wDoc 并在每个 wApp 和 wDoc 上创建表来解决了该问题。当然这不是一个很好的选择。一个wApp和wDoc需要有多个表格、文本等。

对于我的工作，我正在通过 VBA 在 Excel 中编写一些宏。我需要制作一个堆积图表。通过打开宏记录器并手动将图表插入到工作表上，我得到了以下代码：

Range("Таблица1").Select
ActiveSheet.Shapes.AddChart2(286, xl3DColumnStacked100).Select
ActiveChart.SetSourceData Source:=Range("Лист1!$I$2:$J$3")

代码中没有什么复杂的。在第一行，我们选择我的智能表格，在第二行，我们创建一个图表对象并选择它，在第三行，我们设置 3D 堆叠图表的源数据范围。结果，我们得到了文件 Example.jpg 中显示的图表

但如果我们简单地按 F5 重复这段代码，我们将得到一个完全不同的图表！

我对这个结果不满意；我需要一个堆积图表！我请求社区帮助解决这个问题！

注意到一个特点。

    public static void main(String args[]){
        List<Integer> list = new ArrayList<>();
        list.add(10);
        list.add(20);
        list.add(30);
        list.add(40);
        list.add(50);
        for(int ints : list){
            if(ints == 30){
                list.remove(new Integer(ints));
            }
        }
    }

正如预期的那样，在运行时会引发 ConcurrentModificationException。（因为据我所知，增强了引擎盖下的迭代器的工作，它与快照字段有关）但是！如果我们稍微改变这个例子，那么一切正常。

    public static void main(String args[]){
        List<Integer> list = new ArrayList<>();
        list.add(10);
        list.add(20);
        list.add(30);
        for(int ints : list){
            if(ints == 20){
                list.remove(new Integer(ints));
            }
        }
    }

现在一切都很好。为什么会这样？在一种情况下会引发异常，而在另一种情况下则不会！我检查了 Java 8。请给出详尽的答案）