Đang tải... (xem toàn văn)
Các vấn đề chung Excel
Hà Nội, ngày 10 tháng 1 năm 2007 Trang 1Biểu đồ “động đậy” trong Excel - 12/11/2004 13h:13Bạn có thấy một biểu đồ chuyển động trong Excel chưa? Với chương trình Viual Basic tự tạo đơn giản, bạn có thể làm cho biểu đồ của mình nhúc nhích trông thật sinh động. Giả sử, bạn có bảng số liệu với cột A chứa giá trị biến số X (từ A4:A19).Giá trị của biến X sau luôn bằng giá trị của biến X trước nó cộng với trị quy định ở ô A1. Bạn cho giá trị ban đầu của biến X là 0 (ô A4), công thức cho ô A5 = A4 + $A$1. Tiếp đó bạn chọn một khoảng (trong trường hợp này là A5:A19) rồi nhấn Ctrl + D để copy công thức từ ô A5 xuống các ô còn lại. Cột B chứa giá trị hàm số Y=SIN(X). Sau đó bạn vào Insert\ Chart để vẽ biểu đồ cho vùng giá trị mà bạn đã tạo. (Bạn nên dùng Chart Type là XY Scatter). Trang 2Để cho biểu đồ của mình nhúc nhích, bạn phải viết một hàm để thay đổi giá trị của ô A1. Khi đó giá trị của bảng số liệu sẽ thay đổi và làm cho biểu đồ cũng thay đổi theo. Bạn nhấn Alt +F11 để hiện ra cửa sổ Visual Basic Editor. Trong của sổ Visual Basic, nhấn F7 để xuất hiện cửa sổ Code. Viết một hàm nhưsau:Sub BieuDoDongDay()Range (“A1”) = 0For i =1 to 150Range (“A1”) = Range (“A1”) + 0.035Next iRange (“A1”) = 0End SubTrở lại cửa sổ của Excel, nhấn Alt + F8 để mở cửa sổ Macro, rồi nhấn Run để thực thi chươngtrình. Bạn có thể đặt phím tắt cho hàm vừa tạo bằng cách nhấn Options. Vậy là xong, bạn có thể chiêm ngưỡng tác phẩm của mình rồi đó. Trang 3Thủ thuật với Microsoft Excel - 27/12/2004 13h:54Mở tệp tin thường dùngPhải thao tác thường xuyên trên một tệp tin (ví dụ bảng quyết toán), bạn có thể chỉ định Excel để chương trình mở tệp tin này (ví dụ quyettoan.xls) mỗi khi chương trình khởi động. Để thực hiện điều này, chỉ cần lưu tệp tin (File > Save As) vào thưmục XLStart nằm trong \Programfiles\Microsoft Office\Office.* Chèn nhiều dòng trong một ô (cell)Trong quá trình nhập dữ liệu, ở chế độ mặc định mỗi lần bạn nhấn Enter thì con chỏ chuột sẽ chọn ô (cell) ngay dưới ô bạn đang thao tác. Chính vì vậy đối với những người “mới vào nghề”, rất khó có thể nhập dữ liệu nhiều dòng trong cùng một ô. Thủ thuật hết sức đơn giản, bạn chỉ việc nhấn tổ hợp phím Alt + Enter.* Thêm màu cho bảng tínhĐể thêm màu hoặc ảnh nền cho bảng tính, bạn chọn Format > Sheet > Background. Tiếp đến, tìmtới ảnh nền (hoặc font màu) bạn thích và nhấn Open.* “Đóng băng” dòng tiêu đềTrong mỗi bảng tính thường có dòng tiêu đề cố định vị trí cho từng cột (column). Nếu bạn nhập dữ liệu trong nhiều dòng và tràn quá màn hình, công việc nhập dữ liệu sẽ rất khó khăn vì dòng tiêu đề “trôi” mất. Để “đóng băng” dòng tiêu đề, nhấn chuột chọn một ô ngay dưới dòng tiêu đề; chọn Window > Freeze Panes. Giờ bạn có thể thoải mái nhập dữ liệu với thanh tiêu đề luôn hiển thị ở phía trên bảng tính Trang 4Tạo công cụ học từ vựng trong ExcelCó bao giờ các bạn nghĩ tới việc tạo công cụ học từ vựng trong Excel giống nhưcác chươngtrình học tiếng Anh không? Đầu tiên bạn hãy tạo một file Excel mới và đặt tên là Timer (bạn có thể đặt tên khác). Bạn xóa hết các sheet, chỉ để lại một sheet và đặt tên là Data. Khối dữ liệu của chúng ta sẽ có 2 cột: Cột một làtựa đề, cột hai là nội dung. Chú ý là các hàng dữ liệu phải liên tục nhau.Tiếp theo, chúng ta tạo một module và đặt tên là ModuleTimer (Hình 1) và nhập đoạn code 1. Ở đây chúng ta dùng hai hàm API là SetTimer và KillTimer.Tạo một form với tên là frmMain với thuộc tính ShowModal là False nhưhình 3 và thêm các đối tượng sau: Trang 5- TextBox txtTopic với thuộc tính WordWrap là True- TextBox txtDescriptions với thuộc tính WordWrap là True- 4 nút lệnh với tên lần lượt: cmdStart, cmdStop, cmdSetTime, cmdClose, với thuộc tính Caption lần lượt: Bắt đầu học, Ngừng học, Định thời gian, Đóng.(xem hình 2) Trang 6Và bây giờ bạn hãy nhập đoạn code 2 cho form frmMain. Bước cuối cùng, bạn hãy trở về màn hình soạn thảo Excel.Cho hiện thanh công cụ Visual Basic (View->Toolbars->Control Toolbox), chọn Command Button (Hình 3) và đặt lên sheet Data (nhưhình 4), đặt tên là cmdHoc với thuộc tính Caption làHọc. Sau đó nhấn đúp vào nút lệnh để nhập đoạn mã sau:Private Sub cmdHoc_Click()frmMain.ShowEnd SubBây giờ bạn hãy trở về màn hình soạn thảo Excel và tắt chế độ Design (nhấn vào biểu tượng thước Ê ke và cây viết), và hãy thử nhấn vào nút lệnh vừa tạo xem sao. Một công cụ học từ vựng thật đơn Trang 7giản, phải không các bạn.Hy vọng rằng bài viết này hữu ích cho các bạn.CODE 1Public Declare Function SetTimerLib "user32"( ByVal HWnd AsLong, ByVal nIDEvent As Long,ByVal uElapse As Long, ByVallpTimerFunc As Long) As LongPublic Declare Function KillTimerLib "user32" ( ByVal HWnd AsLong, ByVal nIDEvent As Long) AsLongPublic TimerID As LongPublic TimerSeconds As SinglePublic BLDefaul As BooleanPublic StrTopic As StringPublic StrDes As StringPublic IntCount As IntegerPublic BLHaveStartTimer AsBooleanSub StartTimer()If BLDefaul = False ThenTimerSeconds = 3 ' Mặc định là 1giâyEnd IfTimerID = SetTimer(0&, 0&,TimerSeconds * 1000&, AddressOfTimerProc)End SubSub SetTime()Dim VTime As SingleDim VAns As StringBLDefaul = FalseVAns = InputBox("Xin nhập vàothời gian (giây) cho timer ", "Định thời gian") If Len(VAns) = 0 ThenBLDefaul = FalseElseVTime = CSng(VAns)TimerSeconds = VTimeBLDefaul = TrueMsgBox "Dữ liệu của bạn không có!", vbOKOnly, "Công cụ học từ vựng" Exit SubEnd IfElseIntCount = IntCount + 1End IffrmMain.txtTopic.Text = StrTopicfrmMain.txtDescriptions.Text =StrDesDoEventsExit SubThongbao1:Call EndTimerEnd SubCODE 2Private Sub cmdClose_Click()If BLHaveStartTimer = True ThenCall cmdStop_ClickEnd IfEndEnd Sub' Nhằm bảo đảm nếu đã gọi Timer rồi thì sẽ không gọi nữaPrivate Sub cmdSetTime_Click()Call SetTimeCall cmdStop_ClickCall cmdStart_ClickEnd SubPrivate Sub cmdStart_Click()If BLHaveStartTimer = False ThenCall StartTimerBLHaveStartTimer = TrueEnd IfEnd SubPrivate Sub cmdStop_Click()Call EndTimer Trang 8End IfEnd SubSub EndTimer()On Error Resume NextKillTimer 0&, TimerIDEnd SubSub TimerProc(ByVal HWnd AsLong, ByVal uMsg As Long, ByValnIDEvent As Long, ByVal dwTimerAs Long)'' The procedure is called byWindows. Put your' timer-related code here.'On Error GoTo Thongbao1If IntCount = 0 Then IntCount = 2BLHaveStartTimer = FalseEnd SubPrivate Sub UserForm_QueryClose(Cancel As Integer,CloseMode As Integer)If CloseMode = vbFormControlMenuThenCancel = TrueMsgBox "Xin bạn đóng bằng nút lệnh ĐÓNG!", vbOKOnly, "Công cụ học từ vựng" End IfEnd SubStrTopic =HÃY KIỂM TRA LẠI ĐĨA MỀM Trang 9Application.Workbooks("Timer").Sheets("Data").Cells(IntCount, 1)StrDes =Application.Workbooks("Timer").Sheets("Data").Cells(IntCount, 2)If Len(Trim(StrTopic)) = 0 ThenIntCount = 2StrTopic =Application.Workbooks("Timer").Sheets("Data").Cells(IntCount, 1)StrDes = Application.Workbooks("Timer").Sheets("Data").Cells(IntCount, 2)If Len(Trim(StrTopic)) = 0 ThenBLHaveStartTimer = FalseCall EndTimerMột bạn đọc tự giới thiệu "nguyên làchuyên gia nghiên cứu đĩa từ" đã cómột số lời khuyên tốt về các đĩa mềm khởi động khẩn cấp và các đĩa cứu nguy của Windows và các chươngtrình khác: " Đừng quá tin là chúngcòn tốt". Đĩa mềm để lâu ngày có thể gây hỏng hóc các sector. Muốn xác nhận chúng vẫn còn làm việc, bạn phải kiểm tra chúng vài tháng một lần - bằng cách khởi động PC từ đĩa mềm đó, hoặc đánh giá bằng công cụ quét đĩa: Trong Windows 98 và Me, bạn chọn Start.Programs.Accessories.SystemTools.ScanDisk. Trong Windows2000 và XP, chọn Start.My Computer, nhấn phải đĩa mềm đó, chọn Properties, và nhấn Tools.Check Now.Lê Văn DuyệtTính thuế thu nhập bằng Excel - 22/1/2005 9h:26Cuối năm là thời điểm cần quyết toán thuế thu nhập cá nhân. Đây là vấn đề không "nhẹ nhàng" chút nào, nhất là khi qui mô công ty của bạn không nhỏ. Tuy nhiên bạn đừng lo, bạn có thể lập trình "bắt" Excel xử lý giúp "gánh nặng" này.Công việc chuẩn bị - PC cài HĐH Windows 2000 hoặc XP, Microsoft Excel XP hoặc 2003- Phụ lục số 1 và số 2, kèm theo Thông tưsố 81/2004/ TT-BTC ngày 13/8/2004 của Bộ Tài chính.- Lên kế hoạch tạo các hàm sau:• PITLC: Hàm tính thuế thu nhập cá nhân dành cho công dân Việt Nam và các cá nhân khác định cưtại Việt Nam.• PITFR: Hàm tính thuế thu nhập cá nhân người nước ngoài cưtrú tại Việt Nam và công dân Việt Nam lao động, công tác ở nước ngoài. [...]... 10h:19 Chức năng PivotTable là chức năng mạnh của Excel, nó giúp bạn tổng kết số liệu nhanh một cách kinh ngạc. Chức năng này đầu tiên xuất hiện trong Excel 5. Tôi cho rằng các bạn đã làm quen với việc tạo và sửa chữa PivotTable bằng cách thủ công và bài viết này sẽ hướng dẫn dùng VBA để tạo và sửa chữa PivotTable một cách linh động. Bài viết sử dụng cho Excel 2000. Giả sử ở sheet1, tơi có khối dữ liệu...Trang 27 Còn một cách nữa, bạn chuyển các tài liệu của mình sang định dạng PDF hoặc lưu lại thành dạng ảnh, cách này sẽ gây khó khăn hơn khi người nhận định thay đổi tài liệu của bạn. Tuy nhiên, bạn dù cách nào đi nữa thì người nhận cũng có thể tìm ra cách để phá vỡ. Vì vậy, điều đó cịn tùy thuộc vào sự tin tưởng của bạn nơi người nhận. Dùng VBA trong Excel để tạo và sửa chữa PivotTable... băng” dịng tiêu đề Trong mỗi bảng tính thường có dịng tiêu đề cố định vị trí cho từng cột (column). Nếu bạn nhập dữ liệu trong nhiều dòng và tràn quá màn hình, cơng việc nhập dữ liệu sẽ rất khó khăn vì dịng tiêu đề “trơi” mất. Để “đóng băng” dịng tiêu đề, nhấn chuột chọn một ơ ngay dưới dòng tiêu đề; chọn Window > Freeze Panes. Giờ bạn có thể thoải mái nhập dữ liệu với thanh tiêu đề ln hiển thị... là chuyên gia nghiên cứu đĩa từ" đã có một số lời khuyên tốt về các đĩa mềm khởi động khẩn cấp và các đĩa cứu nguy của Windows và các chương trình khác: " Đừng quá tin là chúng còn tốt". Đĩa mềm để lâu ngày có thể gây hỏng hóc các sector. Muốn xác nhận chúng vẫn còn làm việc, bạn phải kiểm tra chúng vài tháng một lần - bằng cách khởi động PC từ đĩa mềm đó, hoặc đánh giá bằng công cụ quét... Duyệt Tính thuế thu nhập bằng Excel - 22/1/2005 9h:26 Cuối năm là thời điểm cần quyết toán thuế thu nhập cá nhân. Đây là vấn đề không "nhẹ nhàng" chút nào, nhất là khi qui mô công ty của bạn khơng nhỏ. Tuy nhiên bạn đừng lo, bạn có thể lập trình "bắt" Excel xử lý giúp "gánh nặng" này. Cơng việc chuẩn bị - PC cài HĐH Windows 2000 hoặc XP, Microsoft Excel XP hoặc 2003 - Phụ... thêm được là 255 sheet. Với con số khổng lồ này thì việc quản lý các bảng sẽ trở nên đơn giản hơn nhiều vì hồn tồn có thể lưu được 255 bảng nằm trên 255 sheet chỉ trong một file Excel. 1, Các kiểu dữ liệu trong bảng tính Khi làm việc với bảng tính bạn sẽ phải làm quen với rất nhiều kiểu dữ liệu, nhưng tất cả các kiểu dữ liệu đó đề dựa vào 3 kiểu cơbản: Kiểu số, Kiểu chữ và Kiểu công thức. a, Kiểu... có nhiều tài khoản đối ứng, đồng thời xóa cột TK (tài khoản). Sub XoaDong() Dim Ngay, Ngay2 As Date Dim Chungtu, Chungtu2, Noidung, Noidung2 As String Lưu giữ các giá trị ở dòng đầu để so sánh trong vòng lặp Range(“A2”).Select Ngay = ActiveCell.Value ActiveCell.Offset(0, 1).Range(“A1”).Select Chungtu = ActiveCell.Value Trang 32 Sau khi chạy lại thủ tục trên tôi sẽ được nhưhình 7. Giả sử bây giờ dữ... Trang 20 Columns(“D:D”).Select Selection.Delete Shift:=xlToLeft Range(“A1”).Select End Sub Các phương pháp giấu số 0 trong Excel - 16/3/2005 14h:39 Khi tính tốn trong Excel, bạn có thể thấy kết quả số 0 nằm ở nhiều nơi trong bảng tính. Điều này gây khó nhìn hoặc lúc in ra sẽ khơng thẩm mỹ. Bạn có thể tìm để xoá các số 0 nhưng rất mất thời gian và nếu chúng là ơ có cơng thức thì bạn phải tạo lại sau... lẫn khi xử lý nhập liệu. Để tránh tình trạng nhầm lẫn bạn có thể sử dụng tính năng Xác nhận thơng tin trong Excel. Ví dụ bạn có cột mức thuế và chắc chắn mức thuế đó khơng vượt 100% thì bạn có thể quy định Excel chỉ nhận các giá trị nhỏ hơn 100. Nhưvậy nếu có lỡ tay thì cũng khơng sợ nhầm lẫn, Excel sẽ nhắc bạn phải nhớ là không được vượt quá 100. Hoặc bạn có thể đặt giá trị nằm trong khoảng nào đó... Tài chính. - Lên kế hoạch tạo các hàm sau: • PITLC: Hàm tính thuế thu nhập cá nhân dành cho công dân Việt Nam và các cá nhân khác định cưtại Việt Nam. • PITFR: Hàm tính thuế thu nhập cá nhân người nước ngoài cưtrú tại Việt Nam và công dân Việt Nam lao động, công tác ở nước ngoài. Trang 13 sử dụng cho chính bảng tính có gắn hàm đã tạo mà thơi. Để tất cả các bảng tính đều có thể sử dụng hàm đã tạo . tiêu đề luôn hiển thị ở phía trên bảng tính.. Trang 4Tạo công cụ học từ vựng trong ExcelCó bao giờ các bạn nghĩ tới việc tạo công cụ học từ vựng trong Excel. And Chungtu = Chungtu2 And Noidung = Noidung2 ThenSelection.EntireRow.DeleteActiveCell.Offset(-1, 0).Range(“A1”).SelectElseEnd IfNgay = Ngay2Chungtu = Chungtu2Noidung