Trang 1 của 2 12 CuốiCuối
Kết quả 1 đến 10 của 17

Chủ đề: Khi thực hiện lệnh Delete có thể thêm vào lựa chọn (Yes or No) ko các bạn ???

  1. #1
    intembaohanh Guest

  2. #2
    trongtin6869 Guest
    Trích dẫn Gửi bởi David882011
    Mình muốn tạo 1 lệnh Delete đơn giản bằng Marco và thêm vào lựa chọn Yes or No . Mong các bạn giúp đỡ . Thanks All !!! [IMG]images/smilies/a07.gif[/IMG]
    Bạn thêm Msgbox vào nữa là sẽ được thôi.

  3. #3
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Trích dẫn Gửi bởi David882011
    Mình muốn tạo 1 lệnh Delete đơn giản bằng Marco và thêm vào lựa chọn Yes or No . Mong các bạn giúp đỡ . Thanks All !!! [IMG]images/smilies/a07.gif[/IMG]
    Sử dụng hàm MsgBox trong VBA. Cụ thể như nào thì up file lên chứ nói khanh khống vậy ai giúp bạn??? Đã có kinh nghiệm post bài rồi mà viết bài như zậy thì ....[IMG]images/smilies/a01.gif[/IMG][IMG]images/smilies/a01.gif[/IMG][IMG]images/smilies/a01.gif[/IMG]

  4. #4
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Bạn chỉ cách mình thêm vào được ko ạh ?

  5. #5
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Trích dẫn Gửi bởi David882011
    Bạn chỉ cách mình thêm vào được ko ạh ?
    File đâu mà thêm cho bạn. Nói không có file thì chỉ theo kiểu không có file thôi chứ.

  6. #6
    manhvlance Guest
    Trích dẫn Gửi bởi David882011
    Bạn chỉ cách mình thêm vào được ko ạh ?
    Mình đang sử dụng code này:

    Mã nguồn PHP:
    Sub Xoa_DL()Dim Ans As VbMsgBoxResult, PssDel As String PssDel = InputBox("Nhap mat khau de thuc hien lenh:", "QUYEN THUC HIEN LENH") If PssDel = "1" Then Ans = MsgBox("Ban chac chan muon xoa du lieu chu?", vbYesNo, "Xac nhan thong tin") If Ans = vbYes Then ActiveSheet.Range("B8:Q60000").ClearContents Else MsgBox "Ban khong co quyen thuc hien lenh nay", vbOKOnly, "Access Denied!" Exit Sub End IfEnd Sub  
    Bạn thay chỗ ("B8:Q60000") theo ý của bạn!

  7. #7
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Sorry . để mình thêm Files vào .

  8. #8
    dqua99 Guest
    Trích dẫn Gửi bởi David882011
    Mình muốn tạo 1 lệnh Delete đơn giản bằng Marco và thêm vào lựa chọn Yes or No . Mong các bạn giúp đỡ . Thanks All !!! [IMG]images/smilies/a07.gif[/IMG]
    Sang Link sau mà tham khảo Msgbox nè rồi tự chế một tẹo là xong
    http://www.giaiphapexcel.com/forum/s...32bit-64bit%29

  9. #9
    capquangvnpt24h Guest
    Bạn hpkhuong ơi . hôm qua cám ơn bạn đã viết dùm mình Đoạn Code này . Bạn có thể sửa dùm mình Copy theo kiểu hàng ngang được ko bạn ?

    Sub Button46_Click()
    Dim lr As Long
    lr = [B1000].End(3).Row
    If lr >= 25 Then
    Range("B" & lr + 1).Value = [D19].Value
    Else
    [B25].Value = [D19].Value
    End If
    End Sub

  10. #10
    ngovanduong64 Guest
    Trích dẫn Gửi bởi pinklove
    Mình đang sử dụng code này:

    <div class="bbcode_container">
    <div class="bbcode_description">PHP Code:
    </div>
    </div>
    </div>
    Thanks bạn !!! [IMG]images/smilies/a07.gif[/IMG]

Trang 1 của 2 12 CuốiCuối

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •