yueh0720

中學生 Rank: 2

帖子: 45
主題: 19
精華: 0
積分: 84
點名: 0
作業系統: Windows XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2010-8-9
最後登錄: 2015-4-14

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2013-8-22 17:56 | 只看該作者

[發問] 如何指定儲存格位置依照需求移動

目前用條碼掃描輸入
當C3儲存格有數值或文字則自動往D3儲存格
當D3儲存格有數值或文字則自動往E3儲存格
當E3儲存格有數值或文字則自動往C3儲存格
持續至A65536
該如何依照需求移動?
未命名12.JPG

樓主熱帖

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

2^#

發表於 2013-8-22 19:41 | 只看該作者

試試：
Set c = [c3:e65536]
d = Application.CountA(c)
c(d + 1).Select

TOP

yueh0720

中學生 Rank: 2

帖子: 45
主題: 19
精華: 0
積分: 84
點名: 0
作業系統: Windows XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2010-8-9
最後登錄: 2015-4-14

3^#

發表於 2013-8-23 09:53 | 只看該作者

oobird 版大:
C儲存格掃入數值後,需手動F8執行,會跳至D儲存格
D儲存格掃入數值後,手動F8執行,不會跳至E儲存格

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

4^#

發表於 2013-8-23 10:18 | 只看該作者

回復 3# yueh0720

@oobird版大方式可以執行

掃描完不是直接輸入嗎? 為何還要按F8 ?

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

吳毅謙

小學生 Rank: 1

帖子: 9
主題: 3
精華: 0
積分: 19
點名: 0
作業系統: Windows7
軟體版本: Excel2003
閱讀權限: 10
性別: 男
來自: 台灣
註冊時間: 2013-7-27
最後登錄: 2013-9-7

5^#

發表於 2013-8-25 11:58 | 只看該作者

回復 1# yueh0720

ActiveSheet.Range("c3").Activate
Do
ActiveCell.Offset(0, 1).Range("A1").Select
Loop Until IsEmpty(ActiveCell.Value) = True

複製代碼

TOP

yueh0720

中學生 Rank: 2

帖子: 45
主題: 19
精華: 0
積分: 84
點名: 0
作業系統: Windows XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2010-8-9
最後登錄: 2015-4-14

6^#

發表於 2013-8-26 10:46 | 只看該作者

ML089 大大：
因為掃瞄輸入後,不會動作,所以才按F8

TOP

sunnyso

高中生 Rank: 3 Rank: 3

帖子: 605
主題: 92
精華: 0
積分: 648
點名: 0
作業系統: windows
軟體版本: 7
閱讀權限: 50
性別: 男
來自: macau
註冊時間: 2013-4-5
最後登錄: 2019-2-10

熱烈參與勳章好學求知勳章

7^#

發表於 2013-8-26 13:06 | 只看該作者

可以設置掃描後加[ENTER]

ss

TOP