Kết quả tìm kiếm

Liên hệ QC
  1. G

    Thứ tự chạy code trên SQL Server ?

    Theo mình hiểu (có thể sai) thì trình tự xử lý data của một câu lệnh SQL các mệnh đề nó được sắp xếp như sau: 1. From 2. Join 3. On 4. Where 5. Group By 6. Having 7. Select 8. Distinct 9. Top 10. Order by Nếu trong câu lệnh SQL tới mệnh đề nào có sử dụng subquery thì sẽ ưu tiên xử lý data trong...
  2. G

    Thử lập trình

    Theo như thầy Mỹ nói em giỏi cộng trừ nhân chia, cách giải của em chỉ quanh quẩn j<0, j<n, j<b, nên nhìn không chuyên bằng các bạn giỏi toán (em dốt toán). Yêu cầu bài #3 của thầy "lúc vẽ thì từ trái sang phải (hoặc cả dòng như một chuỗi); và xong một dòng mới được sang dòng kế tiếp", thì em...
  3. G

    Thử lập trình

    Bài này không phải đệ quy và cũng không phải hình vuông đối xứng, nếu đối xứng thì không đáp ứng được yêu cầu bài #3 của thầy. Em mượn pw của thầy và rút gọn một số biểu thức trong vòng lặp để dễ nhìn hơn. Sub test4() Call ThuLapTrinh(10) End Sub Sub ThuLapTrinh(n As Long) Dim t As...
  4. G

    Thử lập trình

    Em chỉ biết cộng trừ nhân chia thôi nên mò ra được cái này chắc cũng đáp ứng được yêu cầu bài #3 của thầy. Sub test4() Call ThuLapTrinh(150) End Sub Sub ThuLapTrinh(n As Long) Dim t As Double t = Timer Dim i As Long, j As Long Dim a As Long, b As Long Dim x As...
  5. G

    Thử lập trình

    Theo yêu cầu đề bài #3 của thầy "lúc vẽ thì từ trái sang phải (hoặc cả dòng như một chuỗi); và xong một dòng mới được sang dòng kế tiếp." thì bài #6 của em không đúng yêu cầu đề bài, #26 em cũng dựa vào #6 nên cũng không đúng yêu cầu đề bài mà thầy đưa ra rồi. Em chỉ làm để các thành viên có...
  6. G

    Thử lập trình

    Em cũng thử đệ quy dựa vào bài #6 của em. Sub test3() Range("A1").Resize(1000, 1000).Value = vbNullString Call Dequy(6) End Sub Sub Dequy(n As Long) Dim Arr Dim i As Long, j As Long Dim k As Long k = n * 2 - 1 ReDim Arr(1 To k, 1 To k) For i = 1 To...
  7. G

    Thử lập trình

    Em nghĩ thầy đang có sự nhầm lẫn ở đây, ở bài #3 của thầy em thấy cái hình nó hiển thị dãy số không giống với hình bài #1.
  8. G

    Thử lập trình

    Em góp cách nghĩ của em: Sub test() Call ThuLapTrinh(5) End Sub Sub ThuLapTrinh(n As Long) Dim a As Long, b As Long Dim i As Long, j As Long Dim Arr Range("A1").Resize(1000, 1000).Value = vbNullString a = n * 2 - 1 b = n * 2 + 1 ReDim Arr(1 To a, 1 To a)...
  9. G

    [Bài tập vui]: Tìm ra mươi ngày 13 rơi vào thứ sáu gần hôm nay nhất!

    Em góp vui với hàm tự tạo dựa theo ý tưởng của thầy VetMini với hàm tự tạo của thầy SA_DQ :D Function T6N13_2(Dat As Date, Count As Long) ReDim Arr(1 To Count, 1 To 3) Dim i As Long, j As Long, Year_Dat As Long Dim W As Long i = Month(Dat) j = Month(Dat) Year_Dat =...
  10. G

    Những câu đố giúp ích cho lập trình code VBA

    Câu 2 anh @HeSanbi cho mình hỏi lợi ích của việc hướng tới việc gộp chung 2 trường hợp thành 1 là gì? Theo mình biết việc gõ .text và .value sẽ cho hai kết quả khác nhau, tùy vào mục đích mình muốn dùng thuộc tính nào. Nếu mình định dạng ngoài Range("A1") giá trị ngày tháng thành...
  11. G

    Nhờ giúp Tìm kiếm từ hoặc cụm từ (Ngoại trừ từ hoặc cụm từ đó viết hoa ở đầu mỗi chữ) trong Word

    Vậy thì sẽ có 2 vòng lặp, 1 vòng lặp mở 600 file word, 1 vòng lặp replace 5000 từ đó vào file word. Vậy thì bạn cần tạo 2 bảng, 1 bảng chứa tên file word, 1 bảng chứa 5000 từ đó với 1 cột là từ viết thường, 1 cột là từ viết hoa. Sau đó bật lên đi ngủ, chắc sáng cũng xong, nếu mình mô tả giống...
  12. G

    Nhờ giúp Tìm kiếm từ hoặc cụm từ (Ngoại trừ từ hoặc cụm từ đó viết hoa ở đầu mỗi chữ) trong Word

    Mình không biết mục đích bạn tìm để làm gì? Nếu để thay thế thì mình thử thay thế từ "di đà" thành "Di Đà" thì tất cả "di đà" hoặc "Di đà" hoặc "di Đà" đều thay đổi thành "Di Đà".
  13. G

    Tặng anh em file quản lý vật tư

    Giao diện của bạn nhìn đẹp mắt quá!
  14. G

    Excel bị lỗi sau khi gửi email bằng CDO

    Bạn thử giải pháp thay các actvieX controls bằng shape xem. Với bạn chuyển code kiểu này .[I7] = Sheet2.[BA1] sang .range("I7").value=Sheet2.range("BA1").value thử, trước mình cũng thích viết tắt kiểu này với .range("I7")=Sheet2.range("BA1"), nhưng khi xài bên office2010 thì bình thường, sang...
  15. G

    Nhờ giúp đỡ xây dựng kế hoạch bảo dưỡng thiết bị

    Vậy là ổn rồi nha bạn. Mình gửi lại file cập nhật thêm cột J của bạn.
  16. G

    Nhờ giúp đỡ xây dựng kế hoạch bảo dưỡng thiết bị

    Cột mốc bảo dưỡng I2,I3 phải là 1 chứ không phải 120 nha bạn, bạn định nghĩa 120M là 4380 ngày tương đương 146 tháng thì ngày bắt đầu bảo dưỡng phải rơi vào tầm tháng 3/2015, mình chỉnh lại các ngày trong tháng 3/2015 thì chạy được.
  17. G

    Nhờ giúp đỡ xây dựng kế hoạch bảo dưỡng thiết bị

    Bạn up file chỉ mỗi thiết bị đó bị lỗi để mìn xem.
  18. G

    Nhờ giúp đỡ xây dựng kế hoạch bảo dưỡng thiết bị

    Bạn có thể xài hàm vlookup để lấy P/N và S/N bên danh sách thiết bị. Nếu chỉ có mỗi duy nhất dạng 120M thì cột loại bảo dưỡng là 120M, mốc bảo dưỡng là 1,
  19. G

    Nhờ giúp đỡ xây dựng kế hoạch bảo dưỡng thiết bị

    P/N và S/N là thông tin của thiết bị, nằm trong danh mục thiết bị, nhật ký bảo dưỡng đâu liên quan tới thông tin thiết bị đâu bạn. ở bảng tính mốc bảo dưỡng bạn làm chưa đúng, nó là bội số của loại bảo dưỡng, loại bảo dưỡng là mốc tối thiểu. Ví dụ thiết bị có bảo dưỡng là 3M,6M,9M,24M thì loại...

Group

DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2
Back
Top Bottom