Thai VI

ใช้ไฟล์  EPS16YEAR.mdb ที่ส่งไปให้
ในการกรองเงื่อนไขต่างๆ

ผมไม่ถนัดใช้ Microsoft Access ครับเลยใช้ Excel Ver 2003 ที่ให้มา ผมไม่สามารถClear Filter หรือล้างการกรองได้ครับ จะมีerror message ว่า Run time error 438 "Object doesn't support this property or method"  ผมdump screen มาแล้วแต่โพสรูปไม่เป็นครับ  ขอคำแนะนำด้วยครับ  :D

สงสัย Excel Ver 2003 ไม่ support

ค้างตรงที่ผมไฮไลท์ไว้ครับ



Sub PRICE_PE_SORT2()
'
' PRICE_PE_SORT Macro
'

'
Sheets("PRICE&PE").Select
       ActiveSheet.Unprotect

   
  Application.Goto Reference:="R4:R2000"
  ActiveWorkbook.Worksheets("PRICE&PE").Sort.SortFields.Clear
  ActiveWorkbook.Worksheets("PRICE&PE").Sort.SortFields.Add Key:=Range( _
      "A4:A2000"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
      xlSortNormal
  With ActiveWorkbook.Worksheets("PRICE&PE").Sort
      .SetRange Range("A4:GO2000")
      .Header = xlGuess
      .MatchCase = False
      .Orientation = xlTopToBottom
      .SortMethod = xlPinYin
      .Apply
  End With
   
        Application.Goto Reference:="MYDATA_HEAD"
  Selection.AutoFilter
 
   
Range("N1").Select

   
End Sub

ทดลอง

ลบ Application.Goto Reference:="R4:R2000" ออก

ลบ ActiveWorkbook. ออก

ซึ่งจะได้เหมือนข้างล่างนี้ แล้วปิด EDITOR
จากนั้น ลองกด ล้างการกรอง ใหม่

ถ้ายังไม่ได้ผลอีก  ก็ ใช้คำสั่งใน MENU  เอาก็แล้วกัน
DATA , Auto Filter (มันจะล้างต้วกรอง)
Goto A3:GO2000 , DATA, Auto Filter (เป็นการตั้งการกรองใหม่)

Sub PRICE_PE_SORT2()
'
' PRICE_PE_SORT Macro
'

'
Sheets("PRICE&PE").Select
       ActiveSheet.Unprotect

   

  Worksheets("PRICE&PE").Sort.SortFields.Clear
  Worksheets("PRICE&PE").Sort.SortFields.Add Key:=Range( _
      "A4:A2000"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
      xlSortNormal
  With Worksheets("PRICE&PE").Sort
      .SetRange Range("A4:GO2000")
      .Header = xlGuess
      .MatchCase = False
      .Orientation = xlTopToBottom
      .SortMethod = xlPinYin
      .Apply
  End With
   
        Application.Goto Reference:="MYDATA_HEAD"
  Selection.AutoFilter
 
   
Range("N1").Select

   
End Sub

พี่ครรชิต  V2003 กับ V2007  ต่างกันอย่างไรครับ

V2003 เก็บราคาย้อนหลังได้เพียง 200 วัน เพราะจำนวน Column ของชีตน้อยเพียง 256 Column


V2007 สามารถเก็บราคาย้อนหลัง ได้เพิ่มขึ้นได้เรื่อยๆ เพราะจำนวน Column ของชีตมีถึง 16384 Column
ตั้งแต่ผมเริ่มเก็บข้อมูลมา ล่าสุด เก็บมีข้อมูลราคาย้อนหลังได้ 509 วันแล้ว

ผมพึ่งได้รับ File EPS 2008 ครับแต่มีคำถาม ในส่วน EPS 2008 พี่คำนวนอย่างไรครับยกตัวอย่าง EPS ของ CPALL ปี2008 ได้ 0.566 Q1 0.24 Q2 0.19 Q3???? Q4 0.136  คำถามคือ q4 ได้มาอย่างไร รบกวนด้วยนะครับ และในส่วนของดำเนินงาน,เงินลงทุน,จัดหาเงิน,เงินท้ายงวด,C/S%,C/A%
และ C/E% คำนวนมาอย่างไรและใช้ดูเพี่ออะไรครับ
[/quote]

[quote="Cherd"]ผมพึ่งได้รับ File EPS 2008 ครับแต่มีคำถาม ในส่วน EPS 2008 พี่คำนวนอย่างไรครับยกตัวอย่าง EPS ของ CPALL ปี2008 ได้ 0.566 Q1 0.24 Q2 0.19 Q3???? Q4 0.136

ผมได้รับ EPS16YEAR07 แล้วครับ แต่สงสัยว่าทำมัย ใน PRICE&PE  

P/E  มันติดลบอ่ะคับแล้ว จะแก้ไงครับ พี่ครรชิต

P = ราคา เป็นบวกเสมอ

E = EPS  ซื่ง ถ้ากำไรก็เป็นค่าบวก ถ้าขาดทุนก็เป็นค่าลบ

ดังนั้น

P/E จึงแสดงค่าเป็น บวกน้อยๆ เมื่อ กำไรมากๆ

P/E จึงแสดงค่าเป็น บวกมากๆ เมื่อ กำไรน้อยๆ

P/E จึงแสดงค่าเป็นลบมากๆ เมื่อ ขาดทุนน้อยๆ

P/E จึงแสดงค่าเป็นลบน้อยๆ เมื่อ ขาดทุนมากๆ

ขอขอบคุณ ท่านพี่ครรชิต มากๆ ที่ช่วยชี้แนะ ข้าน้อย



 :oops:  :oops:

รบกวนพี่ครรชิตอีกครั้งครับ

ผมเปิด Microsoft Access  แล้วเห็นมีหัวข้อต่างๆๆ

อยากถามว่ามันจะอัพเดตตาม EPS16YEAR07 เวลาเราอัพเดตมั้ยครับ

แล้วอยากจะกรอง ตามแบบของเรา ต้องตั้งเงื่อนไขไงครับ แบบว่าไม่เคยใช้  Access เลย

ถ้ารบกวนพี่ แคปหน้าจอเวลาทำเพิ่มเงื่อนไข จะได้ทำเป็น กับเค้าด้วย

ขอบคุณครับท่านพี่


ปล.อ่านที่เคยอธิบายแต่ผมคงโง่ไม่สามารถทำได้ T_T

การอับเดท ข้อมูล จาก EPS16YEAR07.xlsm เพื่อส่งไปให้ EPS16YEAR.mdb

1. เปิด ทั้งสองไฟล์ขึ้นมา
2. ไปที่ ชีต PRICE&PE แล้วกด ปุ่ม Copy All Data
3. ไป EPS16YEAR.mdb แล้วกดดับเบิลคลิก ปุ่มMacro ล้างและรับข้อมูลใหม่ Sheet1 (อยู่ล่างสุด)

การต้้งเงื่อนไขในการกรอง ให้ดูจากตัวอย่าง ที่ผมทำไว้แล้ว
โดยชี้ไปที่งานใดๆ กดเมาส์ปุ่มขวาเพื่อเรียก Popup คำสั่ง
แล้วเลือกคำสั่ง Design View

จากนั้นก็เลื่อนไปดูวิธีตั้งเงื่อนไขการกรองในตัวอย่าง แล้วลองหัดเลียนแบบทำดู

ขอบคุณมากค่ะ ได้รับแล้ว  และอยู่ระหว่างการฝึกใช้ มีปัญหา ก็มาเปิดดูกระทู้ของท่านอื่น ๆที่ผ่านมา แล้วก็ลองทำตาม ได้บ้าง ไม่ได้บ้าง ก็จะพยายมทำความเข้าใจ เพื่อให้เกิดประโยชน์สูงสุด ขอบคุณในมหากุศล ครั้งนี้ของคุณค่ะ

พี่ครรชิต

ผมสามารถนำข้อมูลในหน้า Price/PE ไป ใส่ในโปรแกรม MetaStock Professional ได้ไหมครับ ?

ถ้าได้ใช้วิธีการไหนหรือครับ

ขอบคุณครับ

ผมไม่มี โปรแกรม MetaStock Professional

ไม่รู้มัน เก็บข้อมูลแบบไหน

ถ้ามีลองส่งโปรแกรมมาให้ผมลองใช้ดู เผื่อว่าจะหาวิธีลิงค์ให้ได้

ไม่ทราบว่าข้อมูลไตรมาศ 3 จะupdate เข้า EPS16YRS ยังไงครับ

ขอถามอีกนิดคับ ROE และ ROEn ต่างกันอย่างไรคับ  ปกติต้องใช้ตัวไหนดูคับ

ROE = ประมาณ EPSทั้งปี / ส่วนผู้ถือหุ้นเฉลี่ย ต้นงวด ท้ายงวด

ROEn =ROE now = EPSจริงเท่าที่ประกาศแล้ว ณ Q นั้นๆ / ส่วนผู้ถือหุ้นเฉลี่ย ต้นงวด ท้ายงวด

การอับเดทงบดุล เครื่องมือทำไว้ให้แล้วบนหัวของชีต ALL

ไม่ทราบว่าข้อมูลการเงินอย่างละเอียดที่แสดงไว้ในชีท Pricechart ของหุ้นแต่ละตัวถูกเก็บไว้ในชีทไหนครับ  ผมอยากเขียนสูตรใน Excel มาดึงข้อมูลการเงินบางตัวเหล่านี้ไปดู แต่ติดที่ว่าในชีท Pricechart ต้องมาเลือกหุ้นทีละตัวจาก Drop Down Menu ก่อน ผมคิดว่าในชีท Price&PE ก้อมีข้อมูลการเงินบางส่วน แต่ผมอยากได้ข้อมูลบางชุดที่มีอยู่ในชีท Pricechart มากกว่าคับ  รบกวนขอคำแนะนำด้วยคับ  :D

ข้อมูลงบดุลทั้งหมด อยู่ในชีต ALL

ผมเข้าไปดูแล้วคับในชีท ALL หุ้นที่ผมดูอยู่เช่น BROCK BGT ไม่มีข้อมูลในชีท ALL (ข้อมูลในแถวนั้นว่างหมด) แต่ถ้าไปดูชีท Price Chart และเลือกDrop down menu จะเห็นข้อมูลการเงินของ BROCK BGT ช่วยแนะนำด้วยคับ  :)

มันติดตัวกรอง อยู่หรือเปล่า

ล้างตัวกรองเสียก่อน ก็จะแสดงหุ้นทั้งหมด

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

ข้อมูลที่ผมเก็บ มี

ลูกหนี้การค้า สินค้าคงเหลือ ทรัพย์หมุนรวม เงินลงทุนบริษัทร่วม ที่ดินอาคารเครื่องจักร ทรัพย์สินรวม

เจ้าหนี้ธนาคาร เจ้าหนี้การค้า หนี้หมุนรวม หนี้สินรวม

บุริมสิทธิ ทุนชำระ ยังไม่จัดสรร ผู้ถือหุ้นใหญ่

รายได้ขาย ส่วนแบ่งกำไร รายได้รวม

ต้นทุนขาย บริหารการขาย ค่าเสื่อม

กำไรก่อน ดอกเบี้ย ภาษี กำไรสุทธิใหญ่

EPS08 DIV08 E08Q3 E08Q2 E08Q1 ราคา08

ดำเนินงาน08 ลงทุน08 จัดหา08 ท้ายงวด08


แต่ใน Price Chart

จะมีรายการเพิ่มขึ้นมาก็โดยให้ Excel คิดให้ ดังนี้

เงินสด&เทียบเท่า = เงิดสด

เอาอย่างงี้ดีกว่าคับถามอย่างนี้จะไหนภาพชัดๆ ผมไปดูข้อมูลการเงินของหุ้น MAJOR ในชีท Price Chart ปี2008 ตามนี้คับ อยากถามว่าข้อมูลชุดเดียวกันนี้ สามารถดึงจากชีทALL ในคอลัมถ์ที่เท่าไรได้บ้าง

ลูกหนี้การค้า          1123.38     จากช่องที่ XX ในชีทALL
สินค้าคงเหลือ         143.57      จากช่องที่ XX ในชีทALL
ทรัพย์หมุนอื่นๆ        372.44      จากช่องที่ XX ในชีทALL

เงินสด&เทียบเท่า    156.59     จากช่องที่ XX ในชีทALL
เงินลงทุนบริษัทร่วม 1530.75    จากช่องที่ XX ในชีทALL
ทรัพย์อื่นๆ               1008.11   จากช่องที่ XX ในชีทALL

เจ้าหนี้การค้า           1257.87   จากช่องที่ XX ในชีทALL
หนี้หมุนอื่นๆ              599.28    จากช่องที่ XX ในชีทALL

กำไรก่อน                  868.87    จากช่องที่ XX ในชีทALL
ส่วนแบ่งกำไร            149.53    จากช่องที่ XX ในชีทALL
รายได้อื่นๆ                269.52    จากช่องที่ XX ในชีทALL

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

SYMBOL MAJOR มาจาก
งบปี 2008
เงินสด&เทียบเท่า 91.885 = ALL!CE223

พี่ครรชิตคราบ
ผมกด Auto Up 2 แล้วไปฉี่
กลับมาแล้วกด Esc ทำไมโปรแกรม Hang คราบ
รบกวนด้วยคราบ
ขอบคุณคราบ

Su407 เขียน:พี่ครรชิตคราบ
ผมกด Auto Up 2 แล้วไปฉี่
กลับมาแล้วกด Esc ทำไมโปรแกรม Hang คราบ
รบกวนด้วยคราบ
ขอบคุณคราบ

ให้รอจังหวะ ตอนที่โปรแกรม-ขึ้นข้อความ Save  พอข้อความ SAVE หายไปปุ้บ ก็รีบกด ESC เลยจึงจะสามารถ เบรค การทำงานของคำสั่ง MACRO ได้ง่าย