返回列表 上一主題 發帖

[發問] 請問大大们我用條碼掃瞄到B5的欄位可以讓它自己跳回B2的欄位嗎

hu0318s

帖子
29 
主題
5 
精華
0 
積分
82 
點名
0  
作業系統
XP 
軟體版本
OFFICE2003 
閱讀權限
20 
註冊時間
2012-6-14 
最後登錄
2020-9-14 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2014-4-12 15:57 | 顯示全部帖子

[發問] 請問大大们我用條碼掃瞄到B5的欄位可以讓它自己跳回B2的欄位嗎

本帖最後由 hu0318s 於 2014-4-12 15:59 編輯

因為公司的專案要寫條碼判定,我用條碼掃瞄到B5的儲存格,一直無法自己跳回B2的儲存格,請問大大们我要如何修改VBA才可以跳回B2儲存格
  1. Private Sub Worksheet_Change(ByVal Target As Range)


  4. If Target.Address = "$b$5" Then
  5. MsgBox "跳回B2儲存格" & Range("B2").Value
  6. End If

  8. End Sub
複製代碼

B CO.JPG (112.93 KB)

B CO.JPG

b co.rar (7.63 KB)

收藏 分享

hu0318s

帖子
29 
主題
5 
精華
0 
積分
82 
點名
0  
作業系統
XP 
軟體版本
OFFICE2003 
閱讀權限
20 
註冊時間
2012-6-14 
最後登錄
2020-9-14 
2#
發表於 2014-4-12 23:04 | 顯示全部帖子
本帖最後由 hu0318s 於 2014-4-12 23:10 編輯

回復 2# GBKEE
報歉大大我是希望我資料到b4的儲存格後, 在執行一次條碼就前就跳到b2的儲存格,不知到vba要如何寫


剛剛修改的vba
  1. Private Sub Worksheet_Change(ByVal Target As Range)


  4. If Target.Address = "$B$5" Then
  5.     Range("B2").Select
  6.    
  7. End If

  9. End Sub
複製代碼

TOP

hu0318s

帖子
29 
主題
5 
精華
0 
積分
82 
點名
0  
作業系統
XP 
軟體版本
OFFICE2003 
閱讀權限
20 
註冊時間
2012-6-14 
最後登錄
2020-9-14 
3#
發表於 2014-4-14 22:01 | 顯示全部帖子
回復 4# GBKEE [/b
謝謝大大的教導,我會再努力學習的 謝謝大大的幫忙

TOP

        靜思自在 : 【是否發揮了良能？】人間壽命因為短暫，才更顯得珍貴。難得來一趟人間，應問是否為人間發揮了自己的良能，而不要一味求長壽。
返回列表 上一主題