Ich verkette 4 verschiedene formelbasierte Spalten in einem mit VBA (um die Formatierung zu ändern, während noch verketten). Der verkettende VBA-Code funktioniert, aber wenn die vier einzelnen Spalten die neuen Informationen aktualisieren und abrufen, ändert sich die verknüpfte Spalte nicht.automatisch VBA verketten Spalte aktualisieren, wenn geändert
Mein verketteten Code ist dies, und es liegt in der Spalte D oder 4:
Sub joint1()
ActiveSheet.Range("a2", ActiveSheet.Range("a2").End(xlDown)).Select
Row = 2
Col = 4
For Each Cell In Selection
AE = Cells(Row, Col + 15)
Name = Cells(Row, Col + 9)
SC = Cells(Row, Col + 16)
PM = Cells(Row, Col + 10)
Cells(Row, Col) = Name & Chr(10) & "(" & AE & " - " & SC & ")" & Chr(10) & PM & " - PM"
With Cells(Row, Col)
.ClearFormats
.Characters(1, Len(Name)).Font.Bold = True
End With
Row = Row + 1
Next
End Sub
Wenn Sie wissen, wie eine Funktion hinzuzufügen, mein Problem zu helfen, wäre ich sehr dankbar!
Versuchen Sie, 'Option Explicit' zum Start Ihres Moduls hinzuzufügen. Dies wird Ihr Problem nicht direkt lösen, aber es wird Ihnen zeigen, wo Dinge schief gehen könnten. Ich habe Ihren Code ausprobiert und es hat überhaupt nicht funktioniert, alle Ihre Variablen werden vom Typ variant sein, und die Dinge werden möglicherweise nicht wie erwartet kopiert. –