Hogyan lehet összekapcsolni a szövegdobozt az Excel több cellájával?

Mint mindannyian ismerjük, könnyen összekapcsolhatunk egy szövegdobozt egy adott cellával, de lehetséges-e több cellát összekapcsolni ugyanazzal a szövegmezővel? Tehát amikor különböző cellákra kattint, a szövegmező különböző szövegeket jelenít meg. Lehet, hogy ez a cikk megoldhatja ezt a feladatot az Excel programban.

Linkelje a szövegdobozt több cellához VBA kóddal

Linkelje a szövegdobozt több cellához VBA kóddal

Ha egy szövegdobozt több cellához szeretne kapcsolni, a következő VBA-kód segíthet, kérjük, tegye a következőket:

1. Először tegyen be egy ActiveX szövegmező alatt a Fejlesztő Tab.

2. Ezután kattintson jobb gombbal a használni kívánt szövegdobozt tartalmazó lapfülre, majd válassza a lehetőséget Kód megtekintése a helyi menüből és a megnyitottból Microsoft Visual Basic for Applications ablakba másolja és illessze be a következő kódot az üresbe Modulok:

VBA kód: a szövegmező összekapcsolása több cellával:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 3 Then ActiveSheet.TextBox1.Text = Target
End Sub

Megjegyzések: A fenti kódban a szám 3 jelzi az oszlop számát, amelyet a kapcsolt cellák keresnek, és 1. szövegdoboz a beillesztett szövegmező neve, kérjük, változtassa meg őket az Ön igényeinek megfelelően.

3. Ezután mentse el és zárja be ezt a kódablakot. Most, amikor különböző cellákra kattint, a különböző értékek automatikusan megjelennek a szövegmezőben, lásd a képernyőképet: