空的Excel工作表导致VBA:运行时错误1004

时间:2020-09-30 20:45:20

标签: excel vba

# ---- Initializing the HOG person detector --------------
detector = cv2.HOGDescriptor_getDaimlerPeopleDetector()
hog = cv2.HOGDescriptor(...)
hog.setSVMDetector(detector) 

# ------- Initialize camera -----
camera = ...

# ------- initialize the tracker ------------
tracker = cv2.TrackerCSRT_create()

target = None
for frame in camera.capture_continuous(rawCapture, format="bgr", use_video_port=True):  
    image = frame.array
    if not target: 
        # -------- DETECTING --------------------
        (regions, weights) = hog.detectMultiScale(...)
        
        i_max_weight = numpy.argmax(weights)
        if weights[i_max_weight] > threshold:
            target = tuple(regions[i_max_weight])
            tracker.init(image, target) 
    else: 
        # -------- TRACKING --------------------
        (success, box) = tracker.update(image)

        # HOW TO CALCULATE THE CURRENT WEIGHT OF "box" HERE???        

这个特定的宏/代码从一堆Excel工作表中读取数据,但是如果其中一个工作表为空白,则会抛出1004错误

到目前为止采取的步骤是

    '^^ Sorting said data
    Set rng = WS.Range("A2")
    **Set rng = Range(rng, rng.End(xlDown).Offset(2000, 0))**
    Set rng = rng.Resize(rng.Rows.Count, 6)
    rng.Interior.ColorIndex = xlColorIndexNone

我该如何书写以确保它向用户突出显示特定的工作表为空白,然后继续进行下一个过程。

0 个答案:

没有答案