Excel Forum

ท่านอาจารย์ครับ

ผมได้ลองทำแนวทางที่ให้สร้าง Folder มาแล้ว Copy รูปไปวางใน Folder นั้นๆ แต่ก็ยังติดปัญหาเหมือนเดิมครับ เหมือนว่ายังมี Process บาง Process ยังเรียกใช้

รูปนั้นๆ อยู่ครับพอมีแนวทางอื่นอีกไหมครับผม

ขอบคุณครับ

โอ่วขอบคุณสำหรับแนวคิดมากครับผม คิดไม่ถึงเลยครับ !!!

รบกวนผู้รู้ทุกท่าน

คือผมต้องการเขียนโปรแกรมเกี่ยวกับการเก็บรูปสินค้าแนวคิดคือ นำรูปไปเก็บไว้ใน Server แล้วทำการเก็บ Path ของรูปนั้นๆ ในรูปแบบ Text

โดยในการนำรูปไปเก็บนั้นให้โปรแกรมทำการ Copy รูปจากเครื่อง User ไปเก็บไว้ใน Server Fix Path ไว้และเปลี่ยนชื่อรูปเป็นระหัสสินค้านั้น ปัญหามีอยุ่ว่าในข ...

ผมลองสุ่มๆ ทำดูก็ยังไม่เข้าใจครับอาจารย์

Dim length As Integer = txt_Note.TextLength ' at end of text
Dim mystring As String = txt_Note.SelectedText

txt_Note.AppendText(mystring)
txt_Note.SelectionStart = length
txt_Note.SelectionLength = mystring.Length
txt_Note.SelectionColor = Color.Red ...

ถึงผู้รู้ทุกท่าน

ผมต้องการเปลี่ยนสีตัวหนังสือใน Textbox (เป็น Mutitext) แต่เปลี่ยนเฉพาะบางตัว หรือ บางบันทัด เท่าที่ลองศึกษาดูในเว็ป มีแต่เปลี่ยนทัั้งหมด

ใน TextBox โดยการใช้ Colordialog จึงอยากสอบถามว่าสามารถจะทำได้ไหม และ ทำได้โดยวิธีไหนครับผม


ขอบคุณครับ

รบกวนท่านผู้รู้ทุกท่าน

ผมได้เขียนโปรแกรมมาหนึ่งตัวและทำตัว Setup เพื่อนำไปใช้ในเครื่อง User ซี่งโปรแกรมใช้ Crystal Report เมื่อนำไปลง

เครื่อง User ไม่สามารถ ดู Report ได้ Error ตาม File แนบครับ รบกวนด้วยครับ

ขอโทษทีครับ ได้แล้ว แค่เปลี่ยนเป็น

DGV_BRK.Rows(i).Cells(j).Value = DBNull.Value

รบกวนท่านผู้รู้ทุกท่าน

ขอรบกวนต่อเนื่องเลยนะครับ คือใน DataGridView มีค่าที่แสดงเป็น 0 ซึ่งใน ฐานข้อมูลก็เป็น 0 แต่ผมไม่ต้องการให้แสดงค่า 0

ต้องการให้เป็นช่อง ว่างๆ เลยอะครับผม

ผมได้เอาโค้ดข้างต้นมาประยุค แต่ก็ยังติด Error อยู่ รบกวนด้วย ครับ


For i = 0 To Me.DGV_BRK.RowCount - 2

For j = 4 ...

OK ได้เรียบร้อยแล้วครับ ผม ขอบคุณอาจารย์มากๆๆๆ ครับผม แต่ปรับแต่งโค้ด นิดหน่อยครับ

For i = Me.DGV_BRK.RowCount - 1 To 0 Step -1

For j = i - 1 To 0 Step -1

If DGV_BRK.Rows(i).Cells(0).Value = DGV_BRK.Rows(j).Cells(0).Value Then

DGV_BRK.Rows.Remove(DGV_BRK.Rows(i))
i = i - 1
End If

Next ...

รบกวนท่านผู้รู้ทุกท่าน

คือผมเขียนโปรแกรมขึ้นมาตัวหนึ่งซึ่งต้องการแสดงข้อมูลเลขที่เอกสารใน DataGridView แต่ในฐานข้อมูลเลขที่เอกสารที่เก็บ

ไม่ได้เป็น PK ดังนั้นในฐานข้อมูลจะมีเลขที่เอกสารที่ซ้ำกันค่อนข้างเยอะ แต่ในตอนที่จะเอามาแสดงใน DataGridView

อยากให้เลขที่เอกสารที่ซ้ำๆ กันโชว์แค่ 1 รายการ ซ ...

โอ้ว มีวิธีนี้ด้วย นิ คิดไม่ถึงเลย ครับ ขอบคุณมากครับ ท่านอาจารย์ ช่วยได้จริงๆ ครับ

รบกวนท่านผู้รู้ทุกท่าน

ผมอยากสอบถามเรื่องการใช้ Array คือตอนนี้ผมเขียนโปรแกมรมขึ้นมา 1 ตัวด้วย VB 2010 โดยการเก็บค่าต่างๆ ไว้ใน Array 2 มิติ แล้วเอาไปโชว์ใน

Listview โดยข้อมูลใน Listview อ้างอิงจาก Array ปัญหาอยู่ตรงที่เมื่องลบรายการใน Listview ต้องการให้ลบใน Array ด้วยเช่น มีข้อมูลอยู่ 3 Rows ...

รบกวนท่านผู้รู้ทุกท่านครับ

พอดีผมเขียนโปรแกรมขึ้นมาตัวหนึ่งซึ้งต้องการให้ปริ้น พรีวิว ก่อนปริ้นซึ้งผมได้เขียนโค้ดดังนี้

Sheet14.Activate
Sheet14.Range("A1:I" & i).Select
Sheet14.PageSetup.PrintArea = Selection.Address
Sheet14.PrintPreview

ซึ้งในขณะที่โปรแกรมโชว์ปริ้นพรีวิว Form ที่ผมสร้างข ...

โอ้ว ขอบคุณมากครับท่านอาจารย์

ลืม บอกไปครับ Error คือ

Run-time error '400':
Form already displayed; can't show modally

ขอรบกวนท่านผู้รู้หน่อยครับ คือ ตอนนี้ผมเขียนโปรแกรมใน Excel เป็น VBA มีอยู่หลาย Form เหมือนกันปัญหาคือสมมติ ผมต้องการที่จะออกจาก Form A แล้วให้ Form B โชว์ ผมก็จะใช้

FormA.Hide
FormB.Show

ปัญหาคือมันทำได้ในครั้งแรกแต่ถ้าทำครั้งต่อไปผมกลับมาเรียกโค้ด

FormB.Hide
FormA.Show

มัน Error ประมาณว่า ...

OK ได้แล้วครับ ขอบคุณมากครับ อาจารย์นิ สุดยอดด จริงๆ อิอิ

ครับผม คือ ผมต้องการเขียนโปรแกรม 1 ตัวซึ้งโปรแกรมตัวนี้ใช้ตรวจสอบการเก็บสินค้าแต่ละตำแหน่ง โดย 1 Button ใช้แทนตำแหน่งเก็บ 1 ตำแหน่งซึ้งทั้งหมดมีประมาณ 260 ตำแหน่งนั้นคือ 260 Button ซึ้งการตรวจสอบก็คือ เมื่อคลิ๊กปุ่ม ตรวจสอบตำแหน่ง ใน Form Home โปรแกรมก็จะไปตรวจสอบที่ Sheet2(DB A)
ว่ามีตำแหน่งไหนบ ...

ตาม File แนบผมได้เขียนการตรวจสอบการเก็บสินค้าเข้าตำแหน่งเก็บ โดยการที่เมื่อกด ตรวจสอบตำแหน่งเก็บ ถ้ามีของจะเป็นสีแดง แต่ถุ้าไม่มีของจะเป็นสีเขียว
โดยการตรวจสอบใน Sheet DB A เบื่องต้นได้ทำการ เขียนไปแล้วบางส่วนซึ้งก็ใช้การแต่ แต่ปุ่มที่ใช้มีจำนวนเยอะมากเลยจะขอวิธีที่ง่ายกว่านี้โดยการ วนลูป หรือ ท ...

พอดีลองเขียนดู

Dim iWidth As Integer = Screen.PrimaryScreen.Bounds.Width
Dim iHeight As Integer = Screen.PrimaryScreen.Bounds.Height

Me.Width = iWidth
Me.Height = iHeight

Me.Location = New System.Drawing.Point(0, 0)

มันรีให้แต่พวก textbox picturebox button มันไม่รีตามอะครับ ต้องแก้ยังไงหรอ ...