在VBA中引用没有固定地址的新列

，可以使用以下方法来实现：

1. 利用列的标题或特定属性进行引用：如果新列具有唯一的标题或属性，可以使用Range对象的Find方法来查找该列，并引用它。例如，假设新列的标题为"新列"，可以使用以下代码引用该列：

Dim newColumn As Range
Set newColumn = Rows(1).Find("新列")

1. 使用列的偏移量进行引用：如果新列是在已知列的右侧，可以使用Offset属性来引用它。例如，假设新列在列A的右侧一列，可以使用以下代码引用该列：

Dim newColumn As Range
Set newColumn = Range("A1").Offset(0, 1)

1. 使用特定条件进行引用：如果新列具有特定的条件，例如某个单元格的值或格式等，可以使用AutoFilter方法筛选出该列并引用它。例如，假设新列的某个单元格包含值"ABC"，可以使用以下代码引用该列：

Dim newColumn As Range
ActiveSheet.AutoFilterMode = False
Range("A1").AutoFilter Field:=1, Criteria1:="ABC"
Set newColumn = Range("A2").SpecialCells(xlCellTypeVisible)
ActiveSheet.AutoFilterMode = False

以上是针对在VBA中引用没有固定地址的新列的几种方法。根据实际情况选择适合的方法来引用新列，并根据需要进行进一步的操作和处理。