แจกไฟล์การสุ่มหาผู้โชคดี

[snasui]

เป็นไฟล์สำหรับการสุ่มหารายชื่อผู้โชคดี หากเก็บรายชื่อออกไปแล้วจะไม่รวมในการสุ่มครั้งถัดไป ลองดาวน์โหลดไปใช้กันตามสะดวก

ไฟล์นี้เขียนด้วย VBA จะต้องกำหนดการใช้งาน VBA (ของ Version 2003) ก่อนตามโพสต์นี้จึงจะใช้งานได้ viewtopic.php?f=9&t=2010#p12997

[jaruek]

ขอบคุณมากครับ

[sarah]

ขอบคุณครับอาจารย์

[วังวู ช่ง]

เป็นไฟล์สำหรับการสุ่มหารายชื่อผู้โชคดี หากเก็บรายชื่อออกไปแล้วจะไม่รวมในการสุ่มครั้งถัดไป ลองดาวน์โหลดไปใช้กันตามสะดวก

ไฟล์นี้เขียนด้วย VBA จะต้องกำหนดการใช้งาน VBA (ของ Version 2003) ก่อนตามโพสต์นี้จึงจะใช้งานได้ viewtopic.php?f=9&t=2010#p12997

[joo]

ขอบคุณครับ

[suwattt]

ขอบคุณมากครับ

[diamondbom]

ขอบคุณครับ

[joi]

Thanks kub

[wilawan-ph]

ขอบคุณค่ะ

[hong_in_bo]

ขอบคุณมากครับ

[DhitiBank]

ขอบคุณครับ

ขอสอบถามอาจารย์หน่อยครับ
ตรง procedure ชื่อ Sub RandomName() ได้มีการประกาศตัวแปร

Code: Select all

Dim i%, j%, l&

เครื่องหมาย % และ & ตามหลัง หมายถึงอะไรเหรอครับ

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

[snasui]

เครื่องหมาย % หมายถึงประกาศตัวแประป็น Integer ส่วน & หมายถึงประกาศตัวแปรเป็น Long ศึกษาเพิ่มเติมจากที่นี่ครับ https://msdn.microsoft.com/en-us/librar ... 92781.aspx

[DhitiBank]

เครื่องหมาย % หมายถึงประกาศตัวแประป็น Integer ส่วน & หมายถึงประกาศตัวแปรเป็น Long ศึกษาเพิ่มเติมจากที่นี่ครับ https://msdn.microsoft.com/en-us/librar ... 92781.aspx

ขอบคุณครับ อาจารย์ ขอลองศึกษาดูหน่อย

[prapassi]

ขอบคุงค้าบบบ

[kabukaburu]

ขอบคุณครับ

[nikkynaja]

สวัสดีครับอาจารย์ ผมขออนุญาติสอบถามเพิ่มเติมนิดนึงครับ หากผมต้องการ Random ขึ้นมาทีเดียว 600 รายชื่อแบบไม่ซ้ำกัน จากทั้งหมด 20,000-100,000 คน ในคลิกเดียว และเก็บรายชื่อของผู้โชคดีทั้งหมด ไว้อีก 1 ที่ จะสามารถทำได้ไหมครับ

ขอบคุณครับ

[snasui]

ด้วย Code VBA แล้วทำได้ทั้งนั้นครับ ลองแนบไฟล์ที่ปรับปรุงเปลี่ยนแปลงเองแล้วไปถามต่อกันในหมวด Excel หมวดนี้เพื่อแจกไฟล์เท่านั้นครับ