Đến nội dung


Hình ảnh
- - - - -

VBA - Vấn đề lấy dữ liệu do người dùng đã nhập vào trước đó


  • Please log in to reply
4 replies to this topic

#1 congcd4

congcd4

    biết pan

  • Members
  • Pip
  • 9 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 02 October 2013 - 09:48 AM

Xin chào tất cả các bạn!

 

Mình có một thắc mắc muốn hỏi các bạn như sau:

 

Chẳng hạn khi mình tạo một đoạn VBA để vẽ tự động, có 1 bước đòi hỏi người dùng nhập vào giá trị; ví dụ là 100.

 

Sau khi thực hiện xong lệnh, mình quay lại thực hiện lệnh đó lần thứ 2, Mình muốn là giá trị 100 do người dùng nhập vào đó vẫn được lưu vào và gợi ý cho người dùng giá trị đó. Họ chỉ cần Enter thay vì phải nhập lại 100. Nếu lệnh này cứ lặp lại nhiều lần thì việc nhập con số 100 đó cho mỗi lần thật sự rất phiền phức

 

Mong các bạn giải đáp giúp mình!

 

Xin chân thành cảm ơn!


  • 0

#2 NguyenNgocSon

NguyenNgocSon

    biết dimbaseline

  • Members
  • PipPipPipPipPip
  • 368 Bài viết
Điểm đánh giá: 39 (tàm tạm)

Đã gửi 02 October 2013 - 11:00 AM

Bạn tham khảo code sau

'By Nguyen Ngoc Son-nguyenngocson@live.com
Public dxx, dxx1 As Double
Sub AAA()
On Error Resume Next
dxx1 = dxx
dxx = ThisDrawing.Utility.GetReal(vbCrLf & "Nhap so: " & "<" & dxx1 & ">")
If dxx = 0 Then dxx = dxx1
MsgBox "so nhap vao la: " & dxx
End Sub


  • 0

#3 congcd4

congcd4

    biết pan

  • Members
  • Pip
  • 9 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 02 October 2013 - 12:09 PM

Mình làm được rồi bạn ạ! Cảm ơn bạn nhiều lắm!

 

Lý do của nó có phải là đưa biến ra toàn cục thì giá trị của nó vẫn lưu sau khi kết thúc hàm không nhỉ?


  • 0

#4 NguyenNgocSon

NguyenNgocSon

    biết dimbaseline

  • Members
  • PipPipPipPipPip
  • 368 Bài viết
Điểm đánh giá: 39 (tàm tạm)

Đã gửi 02 October 2013 - 02:04 PM

Chính xác. Khai báo biến toàn cục. Mình mất khá nhiều thời gian để code được cái này :D
 


  • 0

#5 congcd4

congcd4

    biết pan

  • Members
  • Pip
  • 9 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 02 October 2013 - 02:45 PM

Cảm ơn bạn rất nhiều, đúng là có nhiều cái đơn giản mà mình không thể ngờ tới. :D


  • 0