Skip to content

Instantly share code, notes, and snippets.

🏠
Working from home

AndroidKy Kyson

🏠
Working from home
Block or report user

Report or block Kyson

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@Kyson
Kyson / pull anr
Created Jan 19, 2017
拉取anr文件
View pull anr
cat /data/anr/traces.txt > /mnt/sdcard/k.txt
exit
adb pull /mnt/sdcard/k.txt k.txt
@Kyson
Kyson / wait-notify-test
Created Jan 9, 2017
测试wait-notify方法
View wait-notify-test
package com.tt;
public class Main {
public static void main(String[] args) {
Object obj = new Object();
new Thread() {
@Override
public void run() {
View gist:e47b82f3bdfb47af1e13e97ca5e1d8d4
Sub 合并当前工作簿下的所有工作表()
Application.ScreenUpdating = False
For j = 1 To Sheets.Count
If Sheets(j).Name <> ActiveSheet.Name Then
X = Range("A65536").End(xlUp).Row + 1
View gist:dbe2c531b1fc6887df054b2acc1d192b
Sub hebing()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xlsx),*.xlsx", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
You can’t perform that action at this time.