ขึ้น Run-Time error 1004

[Suchada K.]

เรียน อาจารย์และเพื่อนสมาชิกทุกท่าน,

ขอรบกวนสอบถามเกี่ยกับ run-time error คือไฟล์ที่เปิดใช้อยู่นี้ ก่อนหน้านี้ Save ด้วย MsOffice2007 แล้ว compatible save เป็น 2003

ตอนนี้ลง MsOffice 2010 พอเปิดไฟล์ที่เคยทำงานและสร้างสูตร Vlookup ไว้แล้ว ปรากฎว่าหน้าจอ Excel ขึ้นว่า Run-Time error ‘1004’ ค่ะ

 

ไม่ทราบว่าท่านใดพอจะแนะได้มั้ยว่าเกิดอะไรขึ้น และพอมีวิธีแก้มั้ยคะ ไม่งั้นต้องสร้างสูตรใหม่หมดเลยอ่ะค่ะ....

 

ขอบคุณทุกท่านค่ะ

Thanks&B.Rgds

Suchada K.

 

[wimon_s]

ลอง Check VBA CODE ในSheet ดูโดยกดปุ่ม Debug ที่แจ้งเตือนขึ้นมา แล้วสังเกตว่าแถบสีแจ้งให้ทราบปรากฏที่CODE อะไร หรือให้ยกเลิกการใช้คำสั่ง VBA ชั่วคราวก่อนแล้วลองCheck ดูใหม่ว่าเปิดได้หรือเปล่า หากมีพื้นVBA คงไล่ Check ได้ครับ หรือ File หากไม่เป็นความลับลองส่งมาให้เพื่อนช่วยๆดูได้ครับ

 

Best Regards & Thankyou

 

Mr. Wimon Siriwat
Human Resources Supervisor & Safety Officer
Thai Summit tape co., th.
Email   :  wim...@tstsc.com
Mobile :  081-1013663
Tell      :  038-347062-9 Ext. 406 
Fax      :  038-347061

--
******************
|= คุณได้รับเมล์นี้ เพราะคุณเป็นสมาชิกกลุ่ม "Excel_for_HR" ของ อ.สำเริง ยิ่งถาวรสุข
|= ส่งคำถามเข้ากลุ่มนี้ ทางอีเมลที่ excel_...@googlegroups.com (ขอความกรุณางดส่งฟอร์เวิร์ดเมล์ที่ไม่เกี่ยวข้อง)
|= หากต้องการยกเลิกการเป็นสมาชิก ส่งเมล์หา อ.สำเริง โดยตรงที่ ysam...@gmail.com
|= ดูตัวเลือกเพิ่มเติมที่
http://groups.google.co.th/group/excel_for_hr?hl=th

[Suchada K.]

เรียน คุณวิมล,

ต้องขอโทษด้วยนะคะ เนื่องจากไฟล์ค่อนข้างเป็นความลับค่ะ ทีนี้จูนขออนุญาต Capture หน้าจอที่ Excel โชว์ให้ดูแทนไม่ทราบว่าพอจะแนะนำอะไรเพิ่มเติมได้มั้ยคะ

แต่จูนไม่เคยเขียน Code VBA เลยนะคะ เขียนยังเขียนไม่เป็นเลย พอขึ้นมาแบบนี้เลยเดี้ยงเหมือนกันค่ะ

 

รบกวนขอคำแนะนำอาจารย์และเพื่อนๆเพิ่มเติมด้วยค่ะ

 

 

Thanks&B.Rgds

Suchada K.

__________ Information from ESET NOD32 Antivirus, version of virus signature database 6370 (20110811) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

[wimon_s]

ลองศึกษาข้อมูลตาม link ด้านล่าง

ปล.ครั้งต่อไปกรุณาอย่าระบุชื่อให้ผมหรือระบุชื่อบุคคลใด(อาจจะยกเว้นอาจารย์)นะครับ   เพื่อนๆสมาชิกอีกหลายท่านสามารถให้ข้อมูลและเสนอแนะได้เท่าเทียมกันทุกท่านครับ 

http://www.mrexcel.com/archive/Errors/32009.html

http://www.teachexcel.com/excel-help/excel-how-to.php?i=95674#7 

[Kanokporn Jariyaphongthakul]

เรียนท่านสมาชิก

อยากขอความอนุเคราะห์จากท่านผู้รู้ในการแยกข้อมูลจากแถว เป็น คอลัมภ์  หรือ จากคอลัมภ์ เป็นแถวค่ะ รบกวนด้วยนะคะ ตามFile แนบค่ะ

ขอบคุณล่วงหน้าค่ะ

[Samroeng]

เรียน คุณกนกพร

ก่อนอื่น ต้องขอสอบถามก่อนว่า ข้อมูลในช่องสีส้มนั้น มีเท่าที่เห็นในไฟล์ตัวอย่าง (221 แถว)
หรือว่ายังจะมีเพิ่มขึ้นไปอีก และจะมีสักกี่แถว เนื่องจากข้อมูลในแนวคอลัมน์นั้น มีน้อยกว่าในแนวแถว
Excel 2003ลงไป มีจำนวน 65536แถว x 256คอลัมน์
Excel 2007ขึ้นไป มีจำนวน 1048576แถว x 16384คอลัมน์

ซึ่งถ้าจำนวนในช่องสีส้ม มีโอกาสที่จะมีจำนวนเท่ากับข้อมูลในคอลัมน์ A ก็จะเก็บข้อมูลในแนวคอลัมน์ได้ไม่หมด

การแปลงข้อมูลจาก แนวตั้งไปเป็นแนวนอน หรือแนวนอนไปเป็นแนวตั้ง ก็ให้ทำการคัดลอกช่วงที่ต้องการ
แล้วไปคลิกขวาที่เซลล์ที่ต้องการวาง เลือก Paste special... ติ๊กเลือก Value และติ๊กเลือก Transpose
แล้วคลิก OK ครับ


อ.สำเริง

---

Mr.Samroeng Yingthawornsuk
Tel. (66)2-347-1066, (66)81-423-9828  Fax.(66)2-347-1067
มีการศึกษา (Education) ไม่ได้แปลว่า มีความรู้ (Knowledge)

More Information, http://www.e-hrit.com

 

Contact Me
Chat aek.samroeng ysam...@hotmail.com

Signature powered by WiseStamp 

2011/8/15 Kanokporn Jariyaphongthakul <kanokp...@tspkk.co.th>

เรียนท่านสมาชิก

อยากขอความอนุเคราะห์จากท่านผู้รู้ในการแยกข้อมูลจากแถว เป็น คอลัมภ์  หรือ จากคอลัมภ์ เป็นแถวค่ะ รบกวนด้วยนะคะ ตามFile แนบค่ะ

ขอบคุณล่วงหน้าค่ะ

--

[Kanokporn Jariyaphongthakul]

ขอบคุณมากค่ะ อาจารย์ ทำตามได้เรียบร้อยแล้วค่ะ เส้นผมบังภูเขาจริง ๆ ค่ะ

From: excel_...@googlegroups.com [mailto:excel_...@googlegroups.com] On Behalf Of Samroeng

Sent: 15 August 2011 3:19 PM
To: excel_...@googlegroups.com

[MANU KAEWMUANG]

 ๏ฟฝ๏ฟฝ๏ฟฝยน๏ฟฝาจ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ
๏ฟฝ๏ฟฝาก๏ฟฝ๏ฟฝาบ๏ฟฝิธีก๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝยน๏ฟฝ๏ฟฝ ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ Approved ๏ฟฝ๏ฟฝอก๏ฟฝ๏ฟฝ๏ฟฝ excel ๏ฟฝ๏ฟฝอน๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ convert ๏ฟฝ๏ฟฝ E-book ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝางแนน๏ฟฝาค๏ฟฝ๏ฟฝ
 
๏ฟฝ๏ฟฝ๏ฟฝ๏ฟฝ่นจิต
 

[Suchada K.]

เรียน คุณวิมล,

ขอบคุณค่ะสำหรับคำแนะนำ

 

ในส่วนของการแก้ไข จูนทำได้แล้วแบบเมาๆ ลองคลิกไปคลิกมาปรากฎว่าแก้ไขได้ โดยเข้าใจว่า ใน MS Excel 2010 มีการตั้ง Security ไว้อีกระดับ เวลาที่เราเอาไฟล์จากต่าง Version มา จะมีการ protect อัตโนมัติ จึงทำให้ทำการแก้ไขไม่ได้ค่ะ โดยจะต้องทำวิธีดังนี้

1)      ไปที่ Menu à File à Info à Permission à ให้เลือก unprotect ออกโดยคลิกไปที่คำนั้นเลย พอคลิกหมดแล้ว หลังจากนั้นก็ทำงานได้ตามปกติค่ะ

ขอบคุณทุกท่านนะคะ

__________ Information from ESET NOD32 Antivirus, version of virus signature database 6374 (20110813) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

[Boontiwa]

เรียน ท่านสมาชิกค่ะ

 

รบกวนสอบถามเพื่อนสมาชิกเกี่ยวกับการลบเวลา โดยที่ เอาเวลาเริ่มโทร ลบด้วยเวลาสิ้นสุด โดยขอให้ผลลัพธ์ออกมาในรูปของเวลาคือ ชั่วโมง:นาที:วินาที

ดังตัวอย่างที่ส่งมาพร้อมกันนี้(ไฟล์แนบ) หากท่านพอทราบวิธีการ โปรดแนะนำด้วยค่ะ

 

ขอบคุณค่ะ

บุญทิวา

 

เบอร์ต้นทาง	เบอร์ภายในที่โทร	เดือน/วัน	เวลาเริ่มโทร	เวลาสิ้นสุด	เลขหมายปลายทาง		ผลลัพธ์
02-5013506	2017	502	130315	131034	819407782		(E - F) =>  ชั่วโมง:นาที:วินาที
02-5013510	1202	502	152003	152129	847146707
02-5013517	2107	504	112520	112544	868889960
02-5013507	2107	504	173212	173240	818375369
02-5013517	1202	509	82645	82814	840092626
02-5013506	2015	509	94136	94304	807399876

---

[wimon_s]

เรียนคุณระรื่นจิต

                ดูจาก File  ถือเป็นมีฝีมือด้าน Excel ดูสบายตาดี และไม่ว่าการ Protect Cell และการ Protect Code VBA  โดยเฉพาะ Code VBA ผมยังเข้าไปดูยังไม่ได้    (ไม่อยากละเมิดลิขสิทธิ) หากเป็นไปได้ช่วยๆ Share ให้เพื่อนสมาชิกดู Code บ้างก็จะดีนะครับ

 

Best Regards & Thankyou

 

Mr. Wimon Siriwat
Human Resources Supervisor & Safety Officer
Thai Summit tape co., th.
Email   :  wim...@tstsc.com
Mobile :  081-1013663
Tell      :  038-347062-9 Ext. 406 
Fax      :  038-347061

----- Original Message -----

From: MANU KAEWMUANG

To: excel_...@googlegroups.com

Sent: Tuesday, August 16, 2011 11:25 AM

Subject: [Excel4HR::1821] อยากรู้ว่าทำโค๊ดอย่างไรค่ะอาจารย์

 เรียนอาจารย์ค่ะ
อยากทราบวิธีการเขียนโค๊ด ให้ใส่รหัส Approved ในเอกสาร excel ก่อนที่จะ convert เป็น E-book ตามไฟล์ตัวอย่างแนนมาค่ะ
 
ระรื่นจิต
 

[ป๋าหมาก]

http://www.excelexperttraining.com/forums/entry.php?b=32

ไม่น่าจะยากสำหรับคุณนะครับ

เมื่อ 16 สิงหาคม 2554, 16:13, wimon_s <wim...@tstsc.com> เขียนว่า:

--

~~~~~~~~~~~~
ขอเป็นคนชั่วด้วยตัวเอง

ไม่ใช่ชั่วเพราะปากคน
~~~~~~~~~~~~

[wimon_s]

    ขอถามเผื่อเพื่อนๆสมาชิกนะครับ 130315 หมายถึงเริ่มโทรเวลา 13 นาฬิการ 3 นาที 15 วินาที(13:03:15) ใช้หรือไม่ครับ  ส่วนการเวลาสิ้นสุดก็น่าจะเป็นเวลาตามข้างต้นเช่นกัน  ส่วนผลลัพธ์ E-F น่าจะเขียนผิดนะครับ 

    หลักการทำงานต้องแปลงตัวเลขเริ่มโทรและสิ้นสุดการโทรให้เป็นรูปFarmat แบบเวลา (hh:mm:ss) เสียก่อนครับ เช่น 13:10:34 - 13:03:05 = 0:07:19  (ตามตัวอย่างที่แนบมา) นาที ช่วยแจ้งกลับด้วยนะครับวิธีคิดแบบนี้ตรงหรือเปล่า ส่วนการแปลงอย่างไรตัวใช้สูตร ซึ่งมีหลายวิธีครับ

[Boontiwa]

เรียน คุณวิมล ค่ะ

 

คุณวิมลเข้าใจถูกต้องแล้วค่ะ ต้องการสื่อแบบนั้นแต่อาจจะเขียนไปผู้อ่านๆ แล้วอาจงงๆๆๆ :)

คุณวิมลแจ้งว่าต้องแปลงเวลาก่อน นั่นคือสิ่งที่ต้องการค่ะ แต่ไม่รู้ว่าวิธีทำต้องทำอย่างไร :(

ไม่แน่ใจว่าได้แนบไฟล์มาให้ดูด้วยหรือป่าวคะ?? เพราะบุญทิวาไม่ได้รับ attached ไฟล์ค่ะ ยังงัยรบกวนด้วยนะคะ

 

ขอบคุณมากๆๆๆ ค่ะ

บุญทิวา

---

[wimon_s]

เพื่อนสมาชิกทุกท่าน/คุณบุญทิวา

              ขอให้เรียนถึงสมาชิก ครับไม่ต้องเอ๋ยชื่อผมก็ได้ครับ นั้นลองวิธีแบบเรียบๆก่อนนะครับ

ที่ Cell G2     =E2-D2

ที่ Cell H2    =IF(G2="","",TIME(TRUNC(G2/10000),TRUNC(MOD(G2,10000)/100),MOD(G2,100)))

 

              นี้เป็นวิธีหนึ่งนะครับ ยังมีอีกหลายวิธีซึ่งเพื่อนอีกหลายท่านคงจะแนะนำให้คุณอีกครับ

[Boontiwa]

ขอบคุณมากนะคะ

ทำตามที่บอกแล้วค่ะ ทำได้แล้วค่ะ  :)

[Boontiwa]

เรียนท่านสมาชิก

 

หลังจากทดลองตามสูตรที่คุณวิมลแจ้งมา ปรากฎว่าแถวที่ 6 รู้สึกว่าผลลัพธ์จะยังไม่ถูกต้อง ไม่แน่ใจว่าผิดพลาดตรงใหนพอแนะนำได้บ้างค่ะ

 

ขอบคุณค่ะ

 

เบอร์ต้นทาง

เบอร์ภายในที่โทร

เดือน/วัน

เวลาเริ่มโทร

เวลาสิ้นสุด

เลขหมายปลายทาง

ผลลัพธ์

02-5013506

2017

502

130315

131034

819407782

719	0:07:19

02-5013510

1202

502

152003

152129

847146707

126	0:01:26

02-5013517

2107

504

112520

112544

868889960

24	0:00:24

02-5013507

2107

504

173212

173240

818375369

28	0:00:28

02-5013517

1202

509

82645

82814

840092626

169	0:02:09

02-5013506

2015

509

94136

94304

807399876

168

0:02:08

---

From: "wimon_s" <wim...@tstsc.com>
To: "excel for hr" <excel_...@googlegroups.com>

Sent: Wednesday, August 17, 2011 11:13:27 AM
Subject: Re: [Excel4HR::1832] การลบข้อมูลเวลา

[Samroeng]

เรียน สมาชิกทุกท่าน

เพิ่งเห็นว่า ได้คำตอบที่ต้องการไปแล้ว แต่ไหนๆ ก็ได้ทำตัวอย่างไว้แล้ว
ก็ขอเอามาแจกจ่ายให้ได้ศึกษากันอีกแบบนึงก็แล้วกันครับ

อ.สำเริง

---

Mr.Samroeng Yingthawornsuk
Tel. (66)2-347-1066, (66)81-423-9828  Fax.(66)2-347-1067
มีการศึกษา (Education) ไม่ได้แปลว่า มีความรู้ (Knowledge)

More Information, http://www.e-hrit.com

 

Contact Me
Chat aek.samroeng ysam...@hotmail.com

Signature powered by WiseStamp 

2011/8/17 Boontiwa <boon...@siit.tu.ac.th>

[wimon_s]

เพื่อนสมาชิกทุกท่าน/คุณบุญทิวา

                ยินดีครับ  การแปลงตัวเลขเป็นเวลาเช่น  130315     ก็สามารถเขียนสูตรแปลงให้อัตโนมัตให้เป็นเวลา 13:03:15   ได้เช่นกันครับหากต้องการ หรือหากท่านใดมีวิธีก็ร่วมกัน Share ความรู้ได้ครับ

 

 

 

Best Regards & Thankyou

[Boontiwa]

ขอบคุณอาจารย์ และเพื่อนสมาชิกทุกท่านค่ะ

ได้ความรู้เพิ่มเติมเยอะเลย :)

---

[Samroeng]

สูตรของคุณวิมลนั้น จะต้องทำกับเวลาเดิมครับ
การเอาเวลามาลบกันก่อน แล้วใช้สูตรดังกล่าวกับผลลัพธ์นั้น จะไม่ถูกต้อง
ต้องเข้าใจว่า หลักการเวลาเรื่องใน Excel นั้น 1 ชม.มี 60 นาที ไม่เหมือนกับกรณี 1 บาท มี 100 สตางค์ครับ

ลองดูตัวอย่างที่ผมแก้ไขให้แล้วในไฟล์แนบครับ

อ.สำเริง

---

Mr.Samroeng Yingthawornsuk
Tel. (66)2-347-1066, (66)81-423-9828  Fax.(66)2-347-1067
มีการศึกษา (Education) ไม่ได้แปลว่า มีความรู้ (Knowledge)

More Information, http://www.e-hrit.com

 

Contact Me
Chat aek.samroeng ysam...@hotmail.com

Signature powered by WiseStamp 

2011/8/17 Boontiwa <boon...@siit.tu.ac.th>

เรียนท่านสมาชิก

[wimon_s]

ขอบคุณครับอาจารย์ พอดีไม่ได้ทำในSheet เลยไม่ได้ตรวจสอบผลลัพท์และการอ้างอิง Cell ทั้งหมด    นั้นก็จะแถมไปอีกสูตรแล้วกันครับ

Cell I2   =TEXT(RIGHT("00000"&D2,6),"00\:00\:00")+0

Cell J2  =TEXT(RIGHT("00000"&E2,6),"00\:00\:00")+0

Cell K2 = J2-I2