要换工作了

每天单程不堵车的情况下要坐2个小时公汽,坚持了快1年了,终于不行了!太累,上班基本上做不了事。又不能熬夜,因为要早起,可灵感都在半夜。现在老婆5个多月了,偶不能总把时间都花在工作上,想想在上一个公司和这个公司我都没怎么休息过,双休是个奢侈品。
总算是让公司里的人学会了在偶的平台上开发,完成了几个项目。10月份去上班的地方离老婆学校很近,憧憬着每天和老婆一起上下班(学)的幸福日子;应聘新公司的职位是程序员,我想程序员的活我应该完成的蛮快的,这样可以有时间和精力放在生活上。其实我也担心我能不能由一个技术总监到程序员的角色转变,以前都是我定规范定要求,现在能否受的了不好的设计和代码。
在面试的时候有一关笔试,还好,没有像别的公司,拿一堆网上java考试的题目,而是自己出的几道题目。一般用网上考java证书的考试题目的笔试,我是交白卷的,没办法,不会做啊,那记得住那么多。比如考线程,考IO,这些我做封装的时候会用到,给开发人员的接口就不会涉及到这些。真是丢人啊。
在新公司有自己的开发平台,初步聊了下,感觉他们的平台还是有待提高 :oops: 我做了4年的平台,估计没时间维护了,找个机会开源了算了。比较符合实际的平台。
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
在VBA中批量替换工作薄字符串可以通过以下步骤实现: 1. 打开目标工作薄,可以使用Open方法打开或者直接使用Workbooks集合中的目标工作薄。 2. 遍历目标工作薄的所有工作表,可以使用For Each循环遍历Worksheets集合。 3. 在每个工作表中,使用Range对象的Replace方法来替换指定的字符串。 4. 确定要替换的字符串以及替换后的字符串。可以使用InputBox获取用户输入的字符串,或者在VBA代码中提前指定。 以下是一个示例代码: ```vba Sub 批量替换工作薄字符串() Dim wb As Workbook Dim ws As Worksheet Dim findStr As String Dim replaceStr As String ' 打开目标工作薄 Set wb = Workbooks.Open("目标工作薄路径") ' 获取要替换的字符串 findStr = InputBox("请输入要替换的字符串:") ' 获取替换后的字符串 replaceStr = InputBox("请输入替换后的字符串:") ' 遍历所有工作表 For Each ws In wb.Worksheets ' 替换工作表中的字符串 ws.Cells.Replace What:=findStr, Replacement:=replaceStr, LookAt:=xlPart, _ MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False Next ws ' 关闭保存工作薄 wb.Close SaveChanges:=True End Sub ``` 运行上述代码后,程序会先弹出两个输入框分别让您输入要替换的字符串和替换后的字符串,然后会逐个替换目标工作薄中的每个工作表中的字符串。最后,工作薄会自动关闭并保存修改。请确保目标工作薄的文件路径和名称正确填写。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值