如何在手势检测器中使用 3 行 3 列的图像进行井字游戏，以便我的逻辑适用于图像颤动

问题描述

Sub copy3()
    
    Const table_array_col As Integer = 5
    
    Dim lookfor As Range
    Dim Row As Integer
    
    Dim lookFor_col As Integer
    lookFor_col = Sh.UsedRange.Columns.Count - 2
    
    Dim Wbk As Workbook
    Set Wbk = Workbooks.Open("C:\Users\XXX.xlsx")
    
    Dim table_array As Range
    Set table_array = Wbk.Sheets("Sheet1").Range("B2:H60")
    
    Dim Sh As Worksheet
    Set Sh = ThisWorkbook.Sheets("Sheet1")
    
    For Row = 2 To 59

        Set lookfor = Sh.Cells(Row,1)
        
        Sh.Cells(Row,lookFor_col).Value = Application.VLookup(lookfor.Value,table_array,table_array_col,0)
    
    Next Row
End Sub

解决方法

也许您可以在底部使用带有图像的堆栈，然后在其顶部使用网格视图逻辑。