Thai VI

prasits เขียน:[email protected], [email protected]

ขอบคุณครับ

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

???
เพราะผมเคยได้แล้ว   แต่พออัพเดตใหม่  ก็ไม่ได้มีไฟล์ใหม่ส่งมาให้
(คือ เกรงใจครับ  กลัวต้องส่งซ้ำหลายครั้ง)

แนะนำนิดนึงว่า  ทำไมคุณครรชิตไม่ทำเป็นดาวน์โหลดไฟล์ในเวปนี้เลยล่ะครับ..

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

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

-ผมว่าส่วนใหญ่รวมทั้งผมด้วย เหมือนไก่ได้พลอยครับ ใช้ไม่เต็มประสิทธิภาพของ eps 12ปีครับ

-เสนอให้พี่ครรชิตพิจารณาด้วย แล้วปักหมุดที่กระทู้ด้วยเลยครับ

                       เคารพ นับถือครับ

weraphat เขียน:ของ cp7-11 ทำไม Q4 มันกำไรเป็น ลบครับ
ไม่รู้ว่ามีอะไรผิดเปล่าครับ

yoyo เขียน:วิธีการกองหุ้นทำยังไงครับ ..
เห็นพี่ครรชิตทำอยู่บ่อยๆ เช่น หุ้นที่มีกำไรเติบโต 5 ปีติดต่อกัน
ประมาณนี้ครับ

Papiruz wrote:
ขอขอบคุณพี่ครรชิตนะครับที่ส่งไฟล์ให้ผมอีกรอบวันที่ 26 Feb น่ะครับ แต่ไม่รู้เป็นไร พอ unzip มันแล้ว มันใช้ไฟล์ excel ไม่ได้เหมือนเดิมนะครับ พอ unprotect sheet แล้ว พอใส่ stock code ไปแทน PTTEP มันไม่เปลี่ยนตามนะครับ

[email protected]

เลยจะรบกวนขออัพเดทพี่อีกสักครั้งครับ ขอบคุณพี่ครรชิตล่วงหน้าไว้ ณ ที่นี้นะครับ  

ply33 เขียน:รบกวนถามพี่ครรชิต ว่าคำนวนยังไงเหรอครับ
พอดีงงนิดหน่อยและผมก็ไม่มีพื้นฐานทางบัญชีเลยครับ อาศัยอ่านเอาว่า EPS = กำไร/จำนวนผู้ถือหุ้น

สมมุติจากไฟล์นะครับ ตัว MAJORมีรายละเอียด ดังนี้

โค้ด: เลือกทั้งหมด

SYMBOL	MAJOR	MAJOR
งบปี	2007	2006
ทรัพย์หมุน	0.00	1,645.74
ทรัพย์สิน	0.00	8,445.15
หนี้หมุน	0.00	2,980.44
หนี้สิน	0.00	4,497.48
บุริมสิทธิ	0.00	0.00
ทุน	0.00	770.16
รอจัดสรร	0.00	346.28
ผู้ถือหุ้น	0.00	3,917.39
รายได้	0.00	3,819.13
กำไรก่อน	0.00	917.50
กำไรสุทธิ	0.00	578.23
EPS	0.000	1.000

ค่า 1.000 ได้มาจากไหนเหรอคับ เพราะถ้า EPS = กำไร/จำนวนผู้ถือหุ้น ล่ะก็น่าจะเป็น 917.50/3,917.39 = 0.234 หรือ 578.23/3917.39=0.147

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

SYMBOL	MAJOR	MAJOR
งบปี	2007	2006
ทรัพย์หมุน	0.00	1,889.13
ทรัพย์สิน	0.00	8,782.03
หนี้หมุน	0.00	3,101.20
หนี้สิน	0.00	4,585.40
บุริมสิทธิ	0.00	0.00
ทุน	0.00	787.19
รอจัดสรร	0.00	447.93
ผู้ถือหุ้น	0.00	4,170.38
รายได้	0.00	5,110.10
กำไรก่อน	0.00	1,099.98
กำไรสุทธิ	0.00	695.18
EPS	0.000	0.900
ปันผล	0.00	0.78
BV	0.00	5.30
epsQ4	0.000	0.150
epsQ3	0.000	0.240
epsQ2	0.000	0.310
epsQ1	0.000	0.200
ราคาปิด	16.00	16.40
Par	1	1
P/E	17.78	18.22
P/BV	3.02	3.10
D/P%	4.88	4.76
ROA(%)	13.86	13.86
ROE(%)	19.97	19.97
PM(%)	13.60	13.60
หนี้/ผู้ถือ	1.10	1.10
EPS*10	0.00	9.00
กำไรโต%	0.00	32.43

pushish เขียน:พี่ครรชิตครับ

สามารถ ทำปุ่ม Macro ย้าย sheet จาก excel ไปเป็น access table ได้ ในปุ่มเดียวหรือเปล่าครับ

พอดี ผมสามารถ ใช้ VB + Access table เขียน application นำข้อมูลมา ประมวลผลและวิเคราะห์ ได้นิดหน่อยครับ อาจเป็นประโยชน์บ้างครับ

(แต่ไม่เก่งถึงขั้นสร้าง กราฟ + update ข้อมูลจาก web น่ะครับ)

javidol เขียน:ขอบคุณพี่ครรชิตมากๆเลยครับ

ผมว่ากระทู้นี้น่าจะปักหมุดนะ เพื่อนๆว่าไงกันบ้างครับ

Sub COPY_TO_CellByCell_1()
'
' COPY_TO_CellByCell_1 Macro
' แมโครถูกบันทึก ณ วันที่ 30/12/2006 โดย Your User Name
'แมโครนี้ใช้คัดลอกข้อมูล โดยสามารถ เปลี่ยน ค่าโดยการหาร
'ถ้าข้อมูลเดิม 1500000000 บาท แต่เราต้องการ ให้แสดง เป็น หน่วย ล้านบาท
'เราก็ตั้งตัวหารให้เป็น 100000 เราก็จะได้ 1500.00 ล้านบาท
'ถ้าข้อมูลเดิม 1500000 พันบาท แต่เราต้องการ ให้แสดง เป็น หน่วย ล้านบาท
'เราก็ตั้งตัวหารให้เป็น 1000 เราก็จะได้ 1500.00 ล้านบาท
'ถ้าตัวหารเป็น 1 หน่วยจะเท่าของเก่า
'
Application.Run "CAL_OFF"
Dim Myvar1, Myvar2
Selection.Copy
Myvar1 = Application.ActiveCell.Value / 1 'เปลี่ยนตัวหารที่ต้องการ

   Windows("EPS12YEAR.xls").Activate
   ActiveCell.FormulaR1C1 = Myvar1
   Application.Goto Reference:="R[0]C[1]"
      Application.CutCopyMode = False

End Sub

Sub COPY_TO_CellByCell_1()
'
' COPY_TO_CellByCell_1 Macro
' แมโครถูกบันทึก ณ วันที่ 30/12/2006 โดย Your User Name
'แมโครนี้ใช้คัดลอกข้อมูล โดยสามารถ เปลี่ยน ค่าโดยการหาร
'ถ้าข้อมูลเดิม 1500000000 บาท แต่เราต้องการ ให้แสดง เป็น หน่วย ล้านบาท
'เราก็ตั้งตัวหารให้เป็น 100000 เราก็จะได้ 1500.00 ล้านบาท
'ถ้าข้อมูลเดิม 1500000 พันบาท แต่เราต้องการ ให้แสดง เป็น หน่วย ล้านบาท
'เราก็ตั้งตัวหารให้เป็น 1000 เราก็จะได้ 1500.00 ล้านบาท
'ถ้าตัวหารเป็น 1 หน่วยจะเท่าของเก่า
'
Application.Run "CAL_OFF"
Dim Myvar1, Myvar2
Selection.Copy
Myvar1 = Application.ActiveCell.Value / 10 'เปลี่ยนตัวหารที่ต้องการ

   Windows("EPS12YEAR.xls").Activate
   ActiveCell.FormulaR1C1 = Myvar1
   Application.Goto Reference:="R[0]C[1]"
      Application.CutCopyMode = False

End Sub

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