babyheomoi
Thành viên thường trực
- Tham gia
- 22/9/13
- Bài viết
- 396
- Được thích
- 91
Em down thủ công mà báo bị virus như vậy đó a! Anh có thể up chỗ khác để em down lại thử.
Mở add-in thì thấy nó vẫn có như hình như không thấy menu gì ráo trọi!
Add-Ins cho Excel 2007 -2016 32bit và 64bit
- Thread starter giaiphap
- Ngày gửi
Thành viên thường trực
Mở add-in thì thấy nó vẫn có như hình như không thấy menu gì ráo trọi!
giaiphap
==(^o^)==
- Tham gia
- 12/3/07
- Bài viết
- 5,769
- Được thích
- 6,243
- Donate (Momo)
- Giới tính
- Nam
Tôi thấy cái tiện ích đã xuất hiện trong Add-ins rồi mà chưa thấy thanh công cụ chắc nó không tương thích rồi. Bạn có cài Teamview thì nhắn tôi ID và mật khẩu để tôi hổ trợ vậy.
vanle33
Thành viên gạo cội
- Tham gia
- 30/10/08
- Bài viết
- 5,866
- Được thích
- 3,953
- Giới tính
- Nam
1) Bạn muốn hỏi lỗi ở chữ "nghn" à?
2) Bạn dùng addin này từ nguồn nào, có chính xác và tin cậy không?
Tôi sử dụng addin VND() thì được kết quả như hình dưới.
vâng em đang muốn hỏi lỗi ở chỗ "ngh`n" em tải trực tiếp từ link ở trang 1 đấy ạ
nếu em đổi sang ngàn thì không có lỗi gì ạ
Chỉnh sửa lần cuối bởi điều hành viên:
vanle33
Thành viên gạo cội
- Tham gia
- 30/10/08
- Bài viết
- 5,866
- Được thích
- 3,953
- Giới tính
- Nam
@anh2691 : Trích dẫn đến 15 lần --> lần đầu tiên tôi thấy có bạn làm như vậy.
1) Hỏi người khác thì đặt bạn hãy "biến" bạn thành người khác nhìn vào câu hỏi sẽ nghĩ gì chứ!
2) Bạn thử dùng addin Accounting Helper v2.2.0 của anh Nguyễn Duy Tuân xem có ra kết quả như hình tôi tải lên không.
ps: v2.2.0 thì tùy bạn chọn.
1) Hỏi người khác thì đặt bạn hãy "biến" bạn thành người khác nhìn vào câu hỏi sẽ nghĩ gì chứ!
2) Bạn thử dùng addin Accounting Helper v2.2.0 của anh Nguyễn Duy Tuân xem có ra kết quả như hình tôi tải lên không.
ps: v2.2.0 thì tùy bạn chọn.
sao lại bị lỗi font
Bluestar092011
Thành viên hoạt động
- Tham gia
- 17/8/15
- Bài viết
- 129
- Được thích
- 147
- Giới tính
- Nam
File của bạn mở ở máy tính của tôi nó ra thế này.
Tôi đoán chắc máy bạn bị lỗi Font Calibri
Kiều Mạnh
I don't program, I beat code into submission!!!
- Tham gia
- 9/6/12
- Bài viết
- 5,421
- Được thích
- 4,032
- Giới tính
- Nam
@giaiphap tham khảo nha
github.com
Ai đam Mê code nhìn đó mà chuyển qua VBA Or ... mà xài ... được hay ko phụ thuộc vào khả năng của từng bạn
GitHub - PATRONAS/opuxl: Excel Addin to connect your favorite programming language with your Excel sheets
Excel Addin to connect your favorite programming language with your Excel sheets - GitHub - PATRONAS/opuxl: Excel Addin to connect your favorite programming language with your Excel sheets
github.com
Mã:
using ExcelDna.Integration;
using System;
using System.Linq;
using Excel = Microsoft.Office.Interop.Excel;
namespace OpuxlClassLibrary
{
class ContentArea
{
public object[] Row { get; set; }
public object[,] Matrix { get; set; }
public object CellValue { get; set; }
private static char PROPERTY_DIVIDER = '&';
private CustomPropertyUtil propertyUtil = new CustomPropertyUtil();
public ContentArea(object[,] data)
{
// Cell Value is the [0,0] value of the matrix
CellValue = data[0, 0];
// We have to remove the first row of the matrix as we will handle it seperatly
Matrix = RemoveRowFromMatrix(0, data);
// And extract the first row without the first element
Row = ExtractTailOfRow(data);
}
/// <summary>
/// Async Task to create a matrix in the currently opened excel sheet.
/// The Task has to be async such that we can write into adjacent cells as it is not allowed in the 'ui thread'.
/// </summary>
public object display()
{
Excel.Application app = (Excel.Application)ExcelDnaUtil.Application;
Excel.Worksheet worksheet = (Excel.Worksheet)app.ActiveWorkbook.ActiveSheet;
Excel.Range startCell = app.ActiveCell;
var propKey = "" + startCell.Row + PROPERTY_DIVIDER + startCell.Column;
/*
* We retrieve the existing custom property for the current cell as we are going to closure around it within the async macro.
* The property contains the current dimensions for the current matrix in the excel sheet. We need to remove this before
* inserting new data, such that the sheet doesn't contain any stale data.
*/
int[] existingDimensions = getExistingDimensions(worksheet, propKey);
// Set a custom propert which has the current cell as its key and the col/rows count of the new matrix as the value.
// We need that data to "clear" the matrix on the next execution of the method within the cell.
propertyUtil.SetCustomProp(worksheet, propKey, "" + Matrix.GetLength(0) + PROPERTY_DIVIDER + Matrix.GetLength(1));
// Have to do the update within an async tasks, as UDFs are not allowed to manipulate other cells.
ExcelAsyncUtil.QueueAsMacro(() =>
{
// If we have existing dimensions for the current formula cell, then we are going to clear the corresponding matrix.
if (existingDimensions != null)
{
int rows = existingDimensions[0];
int cols = existingDimensions[1];
// We clear the matrix below the formula row
SetRangeValue(rows, cols, new object[rows, cols]);
// And then the row behind the starting cell (without the starting cell itself)
SetRowValue(new object[cols - 1]);
}
// We set the Matrix part (the matrix directly beneath our formula row).
SetRangeValue(Matrix.GetLength(0), Matrix.GetLength(1), Matrix);
// And then the row part (the row directly to the right of our formula cell).
SetRowValue(Row);
});
return CellValue;
}
/// <summary>
/// Extracts the existing dimensions for an existing sheet property, if present.
/// </summary>
/// <param name="worksheet">The Excel worksheet</param>
/// <param name="propertyKey">The key of the property</param>
/// <returns>The dimensions, or null.</returns>
private int[] getExistingDimensions(Excel.Worksheet worksheet, String propertyKey)
{
string value = propertyUtil.GetCustomProp(worksheet, propertyKey);
if (!string.IsNullOrEmpty(value))
{
return value.Split(PROPERTY_DIVIDER).Select(x => int.Parse(x)).ToArray();
}
return null;
}
/// <summary>
/// Sets the "row" part of the result matrix, which is the right part next to the starting cell, eg [1, 0] ... [n, 0].
/// </summary>
/// <param name="value">The row values</param>
private void SetRowValue(object[] value)
{
Excel.Application app = (Excel.Application)ExcelDnaUtil.Application;
Excel.Worksheet worksheet = (Excel.Worksheet)app.ActiveWorkbook.ActiveSheet;
Excel.Range startCell = app.ActiveCell;
if (startCell.HasFormula)
{
// If the current cell has a formula, then we are in the formula wizard and need to move our
// starting cell row by 1.
startCell = (Excel.Range)worksheet.Cells[startCell.Row + 1, startCell.Column];
}
startCell = (Excel.Range)worksheet.Cells[startCell.Row - 1, startCell.Column + 1];
Excel.Range endCell = (Excel.Range)worksheet.Cells[startCell.Row, startCell.Column + value.Length - 1];
var writeRange = worksheet.Range[startCell, endCell];
writeRange.Value2 = value;
}
/// <summary>
/// Sets the "matrix" part of the result matrix, which is the the complete matrix starting at the second row,
/// eg [0, 1] ... [n, m]
/// </summary>
/// <param name="rows">Count of rows</param>
/// <param name="cols">Count of cols</param>
/// <param name="value">The matrix values</param>
private void SetRangeValue(int rows, int cols, object[,] value)
{
Excel.Application app = (Excel.Application)ExcelDnaUtil.Application;
Excel.Worksheet worksheet = (Excel.Worksheet)app.ActiveWorkbook.ActiveSheet;
Excel.Range startCell = app.ActiveCell;
if (startCell.HasFormula)
{
// If the current cell has a formula, then we are in the formula wizard and need to move our
// starting cell row by 1.
startCell = (Excel.Range)worksheet.Cells[startCell.Row + 1, startCell.Column];
}
Excel.Range endCell = (Excel.Range)worksheet.Cells[startCell.Row + rows + -1, startCell.Column + cols - 1];
var writeRange = worksheet.Range[startCell, endCell];
writeRange.Value2 = value;
}
private static object[] ExtractTailOfRow(object[,] matrix)
{
var columnsCount = matrix.GetLength(1);
object[] result = new object[columnsCount - 1];
for (int i = 1; i < columnsCount; i++)
{
result[i - 1] = matrix[0, i];
}
return result;
}
private static object[,] RemoveRowFromMatrix(int rowToRemove, object[,] matrix)
{
int rowsToKeep = matrix.GetLength(0) - 1;
object[,] result = new object[rowsToKeep, matrix.GetLength(1)];
int currentRow = 0;
for (int i = 0; i < matrix.GetLength(0); i++)
{
if (i != rowToRemove)
{
for (int j = 0; j < matrix.GetLength(1); j++)
{
result[currentRow, j] = matrix[i, j];
}
currentRow++;
}
}
return result;
}
}
}
xuongrongdat
Có bao giờ bạn tự hỏi "Tôi là ai?"
- Tham gia
- 30/6/08
- Bài viết
- 1,704
- Được thích
- 1,572
- Donate (Momo)
- Nghề nghiệp
- Vô tư cùng bạn bè đi khắp nơi.
Em mới cài luôn. Addin có rất nhiều chức năng hay anh ơi, cảm ơn anh nhiều. Mà em tận hưởng được 1 lần. Rồi lần 2 em mở lên nó bị đơ khúc này luôn rồi. Đang không biết làm sao: (em xài Office 2016, 32 bit)
xuongrongdat
Có bao giờ bạn tự hỏi "Tôi là ai?"
- Tham gia
- 30/6/08
- Bài viết
- 1,704
- Được thích
- 1,572
- Donate (Momo)
- Nghề nghiệp
- Vô tư cùng bạn bè đi khắp nơi.
@giaiphap : anh còn phát triển Addin này không? Anh có thể tích hợp tính năng này vào 1 tổ hợp phím tắt không: khi nhấn tổ hợp phím này thì sẽ nhảy trở về Sheet đã thao tác trước đó. Giống như Window thì có Alt+Tab chuyển qua lại các Cửa sổ làm việc á.
Vì em có những file dữ liệu mà trong đó có rất nhiều sheet. Có những lúc em phải di chuyển qua lại 2 sheet liên tục nhiều lần á, mà 2 sheet đó nằm ở đầu sông cuối sông luôn.
Vì em có những file dữ liệu mà trong đó có rất nhiều sheet. Có những lúc em phải di chuyển qua lại 2 sheet liên tục nhiều lần á, mà 2 sheet đó nằm ở đầu sông cuối sông luôn.
giaiphap
==(^o^)==
- Tham gia
- 12/3/07
- Bài viết
- 5,769
- Được thích
- 6,243
- Donate (Momo)
- Giới tính
- Nam
Cám ơn bác, nhưng mấy bửa nay win nó bị lỗi và cái Visual Studio của mình không chạy được nên chưa test thử. Lúc này lu xu bu quá nên chưa cài lại được Win.@giaiphap tham khảo nha
GitHub - PATRONAS/opuxl: Excel Addin to connect your favorite programming language with your Excel sheets
Excel Addin to connect your favorite programming language with your Excel sheets - GitHub - PATRONAS/opuxl: Excel Addin to connect your favorite programming language with your Excel sheets
Ai đam Mê code nhìn đó mà chuyển qua VBA Or ... mà xài ... được hay ko phụ thuộc vào khả năng của từng bạnMã:using ExcelDna.Integration; using System; using System.Linq; using Excel = Microsoft.Office.Interop.Excel; namespace OpuxlClassLibrary { class ContentArea { public object[] Row { get; set; } public object[,] Matrix { get; set; } public object CellValue { get; set; } private static char PROPERTY_DIVIDER = '&'; private CustomPropertyUtil propertyUtil = new CustomPropertyUtil(); public ContentArea(object[,] data) { // Cell Value is the [0,0] value of the matrix CellValue = data[0, 0]; // We have to remove the first row of the matrix as we will handle it seperatly Matrix = RemoveRowFromMatrix(0, data); // And extract the first row without the first element Row = ExtractTailOfRow(data); } /// <summary> /// Async Task to create a matrix in the currently opened excel sheet. /// The Task has to be async such that we can write into adjacent cells as it is not allowed in the 'ui thread'. /// </summary> public object display() { Excel.Application app = (Excel.Application)ExcelDnaUtil.Application; Excel.Worksheet worksheet = (Excel.Worksheet)app.ActiveWorkbook.ActiveSheet; Excel.Range startCell = app.ActiveCell; var propKey = "" + startCell.Row + PROPERTY_DIVIDER + startCell.Column; /* * We retrieve the existing custom property for the current cell as we are going to closure around it within the async macro. * The property contains the current dimensions for the current matrix in the excel sheet. We need to remove this before * inserting new data, such that the sheet doesn't contain any stale data. */ int[] existingDimensions = getExistingDimensions(worksheet, propKey); // Set a custom propert which has the current cell as its key and the col/rows count of the new matrix as the value. // We need that data to "clear" the matrix on the next execution of the method within the cell. propertyUtil.SetCustomProp(worksheet, propKey, "" + Matrix.GetLength(0) + PROPERTY_DIVIDER + Matrix.GetLength(1)); // Have to do the update within an async tasks, as UDFs are not allowed to manipulate other cells. ExcelAsyncUtil.QueueAsMacro(() => { // If we have existing dimensions for the current formula cell, then we are going to clear the corresponding matrix. if (existingDimensions != null) { int rows = existingDimensions[0]; int cols = existingDimensions[1]; // We clear the matrix below the formula row SetRangeValue(rows, cols, new object[rows, cols]); // And then the row behind the starting cell (without the starting cell itself) SetRowValue(new object[cols - 1]); } // We set the Matrix part (the matrix directly beneath our formula row). SetRangeValue(Matrix.GetLength(0), Matrix.GetLength(1), Matrix); // And then the row part (the row directly to the right of our formula cell). SetRowValue(Row); }); return CellValue; } /// <summary> /// Extracts the existing dimensions for an existing sheet property, if present. /// </summary> /// <param name="worksheet">The Excel worksheet</param> /// <param name="propertyKey">The key of the property</param> /// <returns>The dimensions, or null.</returns> private int[] getExistingDimensions(Excel.Worksheet worksheet, String propertyKey) { string value = propertyUtil.GetCustomProp(worksheet, propertyKey); if (!string.IsNullOrEmpty(value)) { return value.Split(PROPERTY_DIVIDER).Select(x => int.Parse(x)).ToArray(); } return null; } /// <summary> /// Sets the "row" part of the result matrix, which is the right part next to the starting cell, eg [1, 0] ... [n, 0]. /// </summary> /// <param name="value">The row values</param> private void SetRowValue(object[] value) { Excel.Application app = (Excel.Application)ExcelDnaUtil.Application; Excel.Worksheet worksheet = (Excel.Worksheet)app.ActiveWorkbook.ActiveSheet; Excel.Range startCell = app.ActiveCell; if (startCell.HasFormula) { // If the current cell has a formula, then we are in the formula wizard and need to move our // starting cell row by 1. startCell = (Excel.Range)worksheet.Cells[startCell.Row + 1, startCell.Column]; } startCell = (Excel.Range)worksheet.Cells[startCell.Row - 1, startCell.Column + 1]; Excel.Range endCell = (Excel.Range)worksheet.Cells[startCell.Row, startCell.Column + value.Length - 1]; var writeRange = worksheet.Range[startCell, endCell]; writeRange.Value2 = value; } /// <summary> /// Sets the "matrix" part of the result matrix, which is the the complete matrix starting at the second row, /// eg [0, 1] ... [n, m] /// </summary> /// <param name="rows">Count of rows</param> /// <param name="cols">Count of cols</param> /// <param name="value">The matrix values</param> private void SetRangeValue(int rows, int cols, object[,] value) { Excel.Application app = (Excel.Application)ExcelDnaUtil.Application; Excel.Worksheet worksheet = (Excel.Worksheet)app.ActiveWorkbook.ActiveSheet; Excel.Range startCell = app.ActiveCell; if (startCell.HasFormula) { // If the current cell has a formula, then we are in the formula wizard and need to move our // starting cell row by 1. startCell = (Excel.Range)worksheet.Cells[startCell.Row + 1, startCell.Column]; } Excel.Range endCell = (Excel.Range)worksheet.Cells[startCell.Row + rows + -1, startCell.Column + cols - 1]; var writeRange = worksheet.Range[startCell, endCell]; writeRange.Value2 = value; } private static object[] ExtractTailOfRow(object[,] matrix) { var columnsCount = matrix.GetLength(1); object[] result = new object[columnsCount - 1]; for (int i = 1; i < columnsCount; i++) { result[i - 1] = matrix[0, i]; } return result; } private static object[,] RemoveRowFromMatrix(int rowToRemove, object[,] matrix) { int rowsToKeep = matrix.GetLength(0) - 1; object[,] result = new object[rowsToKeep, matrix.GetLength(1)]; int currentRow = 0; for (int i = 0; i < matrix.GetLength(0); i++) { if (i != rowToRemove) { for (int j = 0; j < matrix.GetLength(1); j++) { result[currentRow, j] = matrix[i, j]; } currentRow++; } } return result; } } }
Name FilterDatabase không phải do Tiện ích tạo ra nhé bạn, chính vì vậy xóa hay không là do file của bạn có dùng đến nó nửa hay không?
Khi bạn gở Add-Ins ra thì nó có chạy như ban đầu hay không? Tôi cũng từng thấy nó khởi động chậm, nhưng sau đó vẫn hoạt động bình thương. Nhưng cũng có máy khởi động rất nhanh và chưa tìm được nguyên nhân.
Lúc này cũng chưa rảnh để nâng cấp Add-Ins, thật ra nó còn chưa hoàn thiện ở một số chức năng. Cũng có dự định nâng cấp nhưng chắc có lẽ sẽ chuyển sang C# tạo Com Add-Ins luôn, nhưng không biết có rảnh để nghiên cứ không nửa.
giaiphap
==(^o^)==
- Tham gia
- 12/3/07
- Bài viết
- 5,769
- Được thích
- 6,243
- Donate (Momo)
- Giới tính
- Nam
Đoạn code bỏ dấu bạn xem chủ đề này #2
Các bước để tạo một Add-Ins hoàn chỉnh.
Chào các thành viên diễn đàn GPE. Trong thời gian vừa qua có một số thành viên GPE nhắn tin riêng hoặc mail riêng cho tôi xin chia sẻ cách tạo Add-Ins cũng như cách tạo file cài đặt Add-Ins để dùng ở một máy tính bất kỳ mà không phải cài đặt thủ công. Hôm nay...
giaiphapexcel.com
ngocha1114
Thành viên mới
- Tham gia
- 28/11/17
- Bài viết
- 25
- Được thích
- 14
- Giới tính
- Nữ
hay quá. nhưng thao tác xong k undo đc. nhưng dù sao cũng rất cảm ơn tác giả. rút gọn được rất nhiều thao tác excel . thả tim <3
xuongrongdat
Có bao giờ bạn tự hỏi "Tôi là ai?"
- Tham gia
- 30/6/08
- Bài viết
- 1,704
- Được thích
- 1,572
- Donate (Momo)
- Nghề nghiệp
- Vô tư cùng bạn bè đi khắp nơi.
Đúng rồi, phải thật cẩn thận mới được. Phải thật hiểu rõ Add-in này, không undo được đôi khi khá bất tiện, quên 1 cái nhiều khi phải làm lại tùm lum á. Chủ nhân chắc sẽ không phát triển Add-in này nữa, hi.
Không bàn cãi là Add-in có những chức năng rất hay.
@giaiphap : em phản hồi thêm, em khởi động Excel không còn bị lỗi đơ máy nữa, xài khá ngon. Chỉ là đôi khi tự nhiên Excel chuột không thao tác được với bảng tính trong vùng các Cell, nó đơ luôn, không chọn được, không phủ được các Cell, mà thao tác được với thanh cuộn trang và các chức năng trên Menu. Khoảng 2 phút sau nó mới trở lại bình thường.
giaiphap
==(^o^)==
- Tham gia
- 12/3/07
- Bài viết
- 5,769
- Được thích
- 6,243
- Donate (Momo)
- Giới tính
- Nam
Bạn kiểm tra phiên bản đang sử dụng có phải là 03.03 hay không? (Xem hình)
Nếu không phải thì trở lại #1 và tải lại file sau đó cài đặt lại và dùng thử xem còn bị đơ nửa hay không?
xuongrongdat
Có bao giờ bạn tự hỏi "Tôi là ai?"
- Tham gia
- 30/6/08
- Bài viết
- 1,704
- Được thích
- 1,572
- Donate (Momo)
- Nghề nghiệp
- Vô tư cùng bạn bè đi khắp nơi.
Bản em đang xài bị lạc hậu mất 0.01 ta ơi.
Để em thử 3.03
Em nhớ là em cài ngay bài #1 mà ta.
Lần chỉnh sửa cuối:
